Nama :
Rangga Setiawan
NIM : 11.11.1998
Kelas
: TI 11 S
Pada
tugas kali ini saya akan menjelaskan mengenai 2 Latihan pemrograman visual
yaitu Mengenal Variabel Constanta Tipe Data dan Latihan IF - Case.
Latihan 1 - Mengenal Variabel Constanta dan
Tipe Data
Seperti
biasa untuk memulai project baru kita buka Microsoft Visual Basic 2010.
1.
Buat Project
baru dengan langkah-langkah
Klik File - New - Project - Windows Form Applications.
2.
Buat Form
dengan tampilan sebagi berikut :
Klik pada Toolbox dan pilih Button, Text Box, Label sesuai tampilan di bawah
ini :
Atur masing-masing properties sebagai berikut :
Object
|
Properties
|
Value
|
Form
|
Name
|
Form1
|
Text
|
Form Satu
|
Label1
|
Text
|
&Nama
|
Label2
|
Text
|
&Alamat
|
Label3
|
Text
|
&Umur
|
Textbox1
|
Name
|
txtnama
|
Textbox2
|
Name
|
txtalamat
|
Textbox3
|
Name
|
txtumur
|
Button1
|
Name
|
btnama1
|
Text
|
Nama 1
|
Button2
|
Name
|
Nama 2
|
Text
|
btnama2
|
Button3
|
Name
|
btalamat1
|
Text
|
Alamat 1
|
Button4
|
Name
|
btalamat2
|
Text
|
Alamat 2
|
Button5
|
Name
|
bttambahumur1
|
Text
|
Tambah Umur 1
|
Button6
|
Name
|
bttambahumur2
|
Text
|
Tambah Umur 2
|
Button7
|
Name
|
btshowform2
|
Text
|
Show Form 2
|
3.
Ketikan kode
program pada masing-masing object
4.
Buat Form
baru dengan cara pilih menu Project - Add Windows Form - Add
5.
Ketikan kode
program pada masing-masing object
6.
Tambahkan
sebuah module dengan cara pilih menu Project - Add Module - Add
7.
Ketikan kode
program sebagai berikut:
8.
Setelah semua
selesai coba program dijalankan, yang terjadi adalah program mengalami
error.
Kemudian muncul pertanyaan :
a.
Apa
yang menyebabkan program error pada btalamat1_Click baris program
alamat = "Purwokerto".
yang menyebabkan program error adalah
adanya 2 pendeklarasian alamat pada
Const alamat = "Purwokerto" dan alamat = "Purwokerto"
pada btalamat1. Constanta tidak dapat menjadikan target dari pendeklarasian
alamat saat program dijalankan karena constanta nilainya tidak dapat berubah.
Cara untuk mengatasi maslah ini adalah dengan membuang salah satu constanta
alamat pada btalamat1. Sehingga koding programnya sebagai berikut:
b.
Kenapa
saat ditekan tombol nama1 dan nama2 nama yang ditampilkan pada textbox nama
berbeda sedangkan saat ditekan tombol alamat1 dan alamat2 alamat yang
ditampilkan pada textbox alamat sama.
Jawabannya adalah pendeklarasian variabel
pada tombol nama 1 menggunakan variabel Dim. Variabel Dim adalah variabel lokal
yang hanya dikenal di tempat variabel tersebut dipesan. Sedangkan pada tombol
nama 2 memang tidak ada pemesanan variabel di dalam form 1 dan hanya di tulis
txtnama.text = nama. Tetapi kita lihat pada Module1 disitu tertulis Public
Const nama As String = "Rangga Setiawan", variabel Public inilah yang
bisa menampilkan nama pada tombol nama 2. Variabel Public adalah variabel yang
dikenal disulurh bagian program, asalkan tempat pemesanannya berada di dalam
Module. Hal ini juga terjadi pada tombol alamt 1 dan alamat 2 yang pemesanan
kedua variabel dilakukan di dalam form1 dan Module1, sehingga akan muncul
alamat yang sama sesuai pemesanan ketika tombol di klik.
c. Kenapa
saat ditekan tombol tambah umur 1 umur selalu keluar angka 1 sedangkan saat ditekan
tombol tambah umur 2 umur selalu bertambah 1 dari umur sebelumnya
Jawabannya adalah karena pada tombol Tambah
Umur 1 variabel yang digunakan adalah Dim dengan tipe data Integer. Seperti
yang saya jelaskan diatas variabel ini bersifat lokal nilainya akan terus sama
sesuai dengan nilai pemesanan. Jika pada tombol Tambah Umur 1 tertulis
Dim umur As Integer
umur += 1
txtumur.Text = umur
maka output program akan terus memunculkan
angka 1 pada saat tombol di klik.
Berbeda dengan tombol Tambah Umur 2,
variabel yang digunakan adalah Static. Variabel Static merupakan variabel yang
nilainya tidak akan hilang selama program tersebut dijalankan. Artinya ketika
pada tombol Tambah Umur 2 tertulis
Static umur As Integer
umur += 1
txtumur.Text = umur
maka output program akan terus memunculkan
penjumlahan +1 dari umur sebelumnya selama kita meng-klik tombol tersebut.
d.
Berikan
analisa anda untuk form dua
Pada Form 2 pemesanan seluruh variabel
menggunakan varibel Static pada Module1. Sedangkan fungsi dari Option Explicit
Off adalah tidak mengharuskan variabel dipesan terlebih dahulu, sehingga
program masih bisa dijalankan dan menghasilkan output yang sama sesuai
pemesanan variabel di dalam Module1.
Latihan
IF dan Case
Untuk
latihan if dan case setelah saya analisa ternyata ada beberapa koding program
yang harus diperbaiki.
1.
Pada
ComboBox Kode Barang sudah dipesan item "TAS", sementara pada setelah
program dijalankan dan kita memilih TAS pada ComboBox yang muncul adalah
namabarang = "-" , harga = 0. Hal ini disebabkan kode barang TAS
tidak di deklarasikan, sehingga program membaca case yang terakhir adalah
namabarang = "-" , harga = 0. Setelah diperbaiki seperti gambar di
bawah ini, maka item TAS akan muncul pada nama barang beserta harga yang sudah
kita pesan pada listing program.
2.
Pada
saat program dijalankan dan setelah jumlah barang kita isi, pada textbox total
bayar sudah langsung menampilkan jumlah yang harus dibayarkan sebelum kita
memilih cara pembelian secara kredit ataupuj tunai. Cara memperbaikinya
dalah dengan cara menghapus txttotbayar.Text = Val(txttotharga.Text) -
Val(txtdiskon.Text) pada txtjmlbrg
3.
Pada saat kita klik tombol Clear ternyata Diskon
dan Total Bayar masih muncul angka 0, kita harus klik dua kali agar semua
terhapus. Cara untuk memperbaikinya adalah dengan menaruh txtdiskon.Clear() dan txttotbayar.Clear()
paling bawah.
4.
Kelemahan
program IF dan Case adalah sebagai berikut :
a.
Kita
harus menulis satu persatu nilai konstanta yang telah kita pesan, sehingga saat
program dijalankan hasilnya sesuai dengan nilai konstanta yang sudah
dipesan.
b.
Kelemahan
yang lain adalah jika data yang harus dimasukan banyak maka ini akan memakan
waktu yang lama.
c.
Jika
terjadi error maka tidak bisa langsung diketahui bagian mana yang salah.
Facebook
