Analisis Latihan 2

ANALISIS TUGAS 2

Latihan 1

1. Yang menyebabkan eror pada btalamat1_Clik baris program alamat = “Kuningan” adalah alamat sudah di deklarisan sebagai konstanta sembari awal, sehingga variabel tersebut tidak akan berubah. Solusinya kita beri tanda (‘) pada alamat = “Kuningan” atau (‘alamat = “Kuningan”) atau di nyatakan tidak ada.

2. Yang menyebabkan apabila di tekan nama1 dan nama2 menampilkan view yg berbeda sedangkan alamat1 dan alamat2 menampilkan view yang sama. Adalah, nama1 menggunakan Dim sehingga mencari deklarasi terdekat. Sedangkan nama2 karena hanya menggunakan txtnama.text = nama sehingga mencari deklarasi pada module

Sedangkan alamat1 dan alamat2 mencari deklarasi yang sama (const alamat = “kuningan”) sehingga menjadikan view yang sama

3. Yang menyebabkan saatdi tekan tombol umur1 selalu keluar angka 1. Dan saat di tekan umur2 . umur selalu bertambah adalah, pada tambah umur 1, variabel umur dideklarasikan bukan sebbagai variabel static sehingga saat ditambah dengan satu nilainya akan kembali menjadi 0 dan ketika di klik angka yang keluar selalu 1 yang didapatkan dari 0+1. Sedangkan pada tambah umur 2,variabel umur dideklarasikan sebagai variabel static yang akan mempertahankan nilainya setelah ditambahkan. Sehingga saat kita menambahkan dengan 1, nilainya akan terus bertambah.

4. Analisis mengenai form dua.

Form 2 merupakan form yang akan keluar apabila tombol show from2 pada form 1 di tekan. Pada form 2 terdapat 3 buah textbox dan 4 buah tombol. Tombol nama akan menampilkan nama pada textbox nama, begitu pula dengan tombol alamat dan umur. Kemudian tombol tutup, ketika di klik form 2 akan tertutup dan kembali ke form satu. Pada kode program form dua tidak terdapat deklarasi variabel, tetapi tetap dapat menghasilkan keluaran. Hal ini dikarenakan terdapat statement Option Expilicit off yang tidak mengharuskan variabel dipesan terlebih dahulu. Dan form dua mengambil nilai yang dideklarasikan pada modul.

Latihan 2 (program if case)

1. Kelemahan pada program ini adalah

a. pada saat kita memilih opsi kode barang “TAS” pada combo box. Tidak terdapat harga dan nama barangnya.

b. Saat kita telah selesai dengan satu kode barang, dan akan mencoba opsi lain pada kode barang lain. Pada text box total harga dan diskon tidak berubah mengikuti harga dari code barang yang kita rubah. Atau tetap pada diskon code barang sebelumnya.

`Solusinya,

1. Untuk kode “TAS” saya mencoba menambahkan Case baru pada cmdkode.

2. Agar total harga dan diskon mengikuti kode barang saya mencoba menambahkan perintah yang ada pada txttotal.text ke dalam cmdkode, dan menambahkan statemen if pada radiotunai