Latihan 1
a. Yang menyebabkan error pada btalamat1_click baris program alamat = "kuningan" adalah :
variabel alamat = "kuningan" belum di-deklarasikan pada method di dalam class tersebut, seharusnya
diatas baris program alamat = "kuningan" ditambahi perintah Dim alamat As String.
b. Saat tombol nama1 dan nama2 ditekan, nama pada textbox nama berbeda sedangkan saat tombol
alamat1dan alamat2 ditekan alamat yang ditampilkan pada textbox alamat sama, hal ini dikarenakan
tombol nama1 sudah memesan variabel string yang sudah dinyatakan sebagai "Nandang". Pada
tombol nama2 pemesanan variable belum dinyatakan, oleh karena itu program akan mengambil
pernyataan yang sudah dideklarasikan pada modul1 yang bersifat public.
c. Saat tombol tambah umur 1 ditekan hasilnya pada textbox umur selalu keluar angka 1 sedangkan pada
tombol tambah umur 2 jika ditekan hasilnya pada textbox umur maka umur akan bertambah 1 dari umur
sebelumya, hal ini dikarenakan perintah pada tombol tambah umur 1 menggunakan variabel Dim yang
akan selalu berubah nilainya jika dijalankan. Sedangkan pada tombol tambah umur 2 menggunakan
variable yang tipenya statik dan nilainya tidak akan berubah, sehingga jika dijalankan akan menambah
nilainya (pada program ini +1), dan akan terus bertambah (+1) jika program ini terus menerus dijalankan.
d. Analisa saya pada form2 adalah :
Pada form2 sudah ada perintah Option Explicit Off, yang artinya form dua mengambil data-data dari
deklarasi publik yang pada kasus ini data tersebut ada pada module1.
Latihan 2
Analisa dan perbaikan yang saya lakukan pada Latihan 2 - If dan Case adalah sebagai berikut :
Kekurangan-kekurangan pada Latihan 2
1. pada kdbarang terdapat kode "TAS" namun tidak ada pendefinisian harga, maka jika program
dijalankan akan terjadi seperti ini :
2. Pada textbox di form tersebut datanya bisa diubah-ubah oleh user. Walaupun tidak begitu berarti,
namun hal ini bisa cukup mengganggu user ketika user salah meng-klik pada textbox txtNama atau
yang lainnya dan terhapus.
Perbaikaan pada Latihan 2
1. Pada cmbKode, kode "TAS" ditambahi perintah sebagai berikut :
Case "TAS"
namabarang = "Tas"
harga = 1000000
maka hasilnya akan seperti gambar berikut :
2. Pada textbox properties kolom behavior, ubah Enabled menjadi False.
dan hasilnya akan seperti gambar berikut :
Demikianlah analisa saya mengenai Tugas Visual Basic Praktikum ke-2.
Apabila ada salah penulisan kata atau ada kata yang kurang berkenan di hati, Saya mohon maaf.
Atas perhatiannya saya ucapkan Terimakasih.
Tidak ada komentar:
Posting Komentar