Di Blog Ini kita akan menjawab soal Latihan 2 pada blog sebelumnya.
Latihan 2:
Buat
program untuk menghitung Luas dan Keliling Persegi Panjang dengan tampilan sbb:
_______________________________________________________________
1. Buka Microsoft Visual Studio 2008
2. Buka Project Baru (Ctrl+Shift+N)
3. klik "Windows Forms Application" lalu klik "OK"
4. Setelah itu, kita lakukan seperti sebelumnya, disain terlebih dahulu Form-nya seperti ini
5. Nah, setelah kita disain Form-nya, lalu kita Disain Tool nya, seperti ini
NO.
|
OBJEK
|
PROPERTIES
|
PENGATURAN
|
1
|
Label1
|
Text
|
PROGRAM PERSEGI PANJANG
|
Font Size
|
9
|
||
Bold
|
True
|
||
2
|
GroupBox1
|
Text
|
Input :
|
3
|
GroupBox2
|
Text
|
Hasil :
|
4
|
Label1
|
Text
|
Panjang :
|
5
|
Label2
|
Text
|
Lebar :
|
6
|
Label3
|
Text
|
Luas :
|
7
|
Label4
|
Text
|
Keliling :
|
8
|
TextBox1
|
Name
|
TxtP
|
9
|
TextBox2
|
Name
|
TxtL
|
10
|
TextBox3
|
Name
|
TxtLuas
|
11
|
TextBox4
|
Name
|
TxtKel
|
12
|
Botton1
|
Text
|
Proses
|
Name
|
BtnProses
|
||
13
|
Botton2
|
Text
|
Bersih
|
Name
|
BtnBersih
|
||
11
|
Button3
|
Text
|
Tutup
|
Name
|
BtnTutup
|
6. jika sudah selesai mendisain lalu kita masuk ke Perintah kode atau Perintah Program, double klik saja pada salah satu Button yang ada di Form, lalu otomatis akan masuk ke Perintah Program, Jika sudah masuk di Perintah Program, lalu kita Input Kode-Kode berikut :
Private
Sub btnproses_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles btnproses.Click
txtLuas.Text = txtP.Text *
txtL.Text
txtKel.Text = Val(2 * txtP.Text)
+ Val(2 * txtL.Text)
End
Sub
Private
Sub btnbersih_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles btnbersih.Click
txtKel.Text = ""
txtL.Text = ""
txtP.Text = ""
txtLuas.Text = ""
End
Sub
Private
Sub btntutup_Click(ByVal
sender As System.Object, ByVal e As
System.EventArgs) Handles btntutup.Click
End
End
Sub
7. setelah itu tekan tombol F5 pada Keyboard untuk cek error atau tidak programnya atau pun menjalankan program, jika error coba anda cek kemabali disain Form yang anda buat, mungkin ada kesalahan mengetik pada saan memberi Name pada disain Toll, jika sudah tidak error maka otomatis Form akan Muncul dan bisa langsung kita jalankan. seperti ini..
8. Dan program pun SELESAI..!!
Terimakasih, Semoga Bermanfaat
Tidak ada komentar:
Posting Komentar