JAWABAN LATIHAN 1 NO.3
Terjadi
error pada alamat serperti dibawah ini :
a. alamat = "Kuningan"
Txtalamat.Text = alamat
Karena belum ada pendeklarasian pada alamat, atau belum
adanya variabel untuk mewakili nama alamat tersebut, maka nama “alamat” harus diberi
variabel dan tipenya .
Maka perbaikanya seperti berikut :
Dim
alamat As String
alamat = "Kuningan"
Txtalamat.Text = alamat
b. Karena
pemanggilan method atau variabel mulai dari dalam method tersebut pada “Nama 1”
apabila di click akan muncul nama “Nandang” karena nama “Nandang” sudah
dideklarasikan di dalam method tersebut, maka apabila di click akan mengerjakan
di dalam method tersebut dan keluar nama “Nandang”, dan pada Btnama2 apabila
ditekan akan muncul “Nandang Hermanto”
karena pada “btnama2” hanya memanggil perintah variabel “nama” dan nama
yang dipanggil terdapat di dalam module yang sifatnya public bisa dipanggil
darimana saja sehingga menghasilkan nama “Nandang Hermanto”
Pada "btnama1"
Dim nama As String
nama
= "Nandang"
Txtnama.Text = nama
Pada "btnama2"
Txtnama.Text = nama
pemaggilan "nama" ada pada module
Public Const nama As String = "Nandang Hermanto"
Pada saat ditekan “btalamat1” dan “btalamat2” masih
sama karena pada program tersebut diberi constata tetap pada variabel alamat
jadi nilai, atau peryataan akan selalu tetap tidak dapat dirubah.
Const alamat = "Kuningan"
