Nih, saya ada sedikit script visual basic untuk belajar membuat program sederhana. Ya walaupun cuma program sederhana yang tidak berarti tapi setidaknya nambah - nambah ilmu kan..Ya kalau mau buat silahkan buat. Ini hanya untuk menambah ilmu dan sekedar sharing aja. Kita ngga ngeliat dari sisi kegunaannya tetapi ilmunya aja..^_^
1. Masuk Visual Basic lalu pilih standard exe,ganti nama form
2.Buat 4 Label
Label 1 diberi nama Angka pertama
Label 2 diberi nama Angka kedua
Label 3 diberi nama Hasil
Label 4 (Tidak Wajib) diisi dengan kata Kalkulator
3.Buatlah 4 button command
Button Command 1 diberi nama Tambah
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a+b
Button Command 2 diberi nama Kurang
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a-b
Button Command 3 diberi nama Kali
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a*b
Button Command 4 diberi nama Bagi
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a/b
4.Buatlah 3 Text
Text 1 untuk angka pertama
Text 2 untuk angka kedua
Text 3 untuk hasil penjumlahan text1 dan text 2
Coba dulu program yang telah anda buat tadi dengan menekan tombol F5 atau mengklik toolbar Run - Start. Letaknya - letaknya terserah anda.Bila program tidak berjalan dengan baik berarti masih ada kesalahan yang harus anda perbaiki lagi. Biasanya VB akan langsung memberitahukan kepada anda, mana kode yang error. Kalau mau mengganti tulisan tinggal setting ke captionnya,kalau mau ganti tulisan atau ukurannya tinggal ke font. Kalau mau ganti background tinggal klik picture di setting formnya. Kalo dah selesai tinggal klik file - make project1.exe. Jadi deh...kalkulatornya.
1. Masuk Visual Basic lalu pilih standard exe,ganti nama form
2.Buat 4 Label
Label 1 diberi nama Angka pertama
Label 2 diberi nama Angka kedua
Label 3 diberi nama Hasil
Label 4 (Tidak Wajib) diisi dengan kata Kalkulator
3.Buatlah 4 button command
Button Command 1 diberi nama Tambah
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a+b
Button Command 2 diberi nama Kurang
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a-b
Button Command 3 diberi nama Kali
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a*b
Button Command 4 diberi nama Bagi
Kodenya :
Dim a,b as integer
A = text1.text
B = text2.text
Text3.text = a/b
4.Buatlah 3 Text
Text 1 untuk angka pertama
Text 2 untuk angka kedua
Text 3 untuk hasil penjumlahan text1 dan text 2
Coba dulu program yang telah anda buat tadi dengan menekan tombol F5 atau mengklik toolbar Run - Start. Letaknya - letaknya terserah anda.Bila program tidak berjalan dengan baik berarti masih ada kesalahan yang harus anda perbaiki lagi. Biasanya VB akan langsung memberitahukan kepada anda, mana kode yang error. Kalau mau mengganti tulisan tinggal setting ke captionnya,kalau mau ganti tulisan atau ukurannya tinggal ke font. Kalau mau ganti background tinggal klik picture di setting formnya. Kalo dah selesai tinggal klik file - make project1.exe. Jadi deh...kalkulatornya.
0 komentar:
Posting Komentar
Ayo Berkomentar