Private Sub CommandButton1_Click() ‘deklarasi xx bernilai  123 Dim xx As String xx = "123" ‘jika TextBox1 kosong  ...