Kali Ini Admin ADH Akan Memposting Seputar VB Nih Hehehe :v
Kebanyakan Kalo Belajar VB Pertama Kali Itu Pasti Disuruh Buat Aplikasi Kalkulator :v
Nah Mungkin Banyak Diluar Sana Yang Memposting Hal Yang Sama Namun Apasalahnya Saya Membagikan Ilmu Yang Saya Punya Kepada Teman-Temanku Sekalian :v
Baiklah Langsung Saja Ke Inti Ceritanya Hehe :v
Yg Dibutuhkan Yaitu :
- Software Visual Basic 6.0 (Ya Pastilah Kalo Nggak Ada Gimana Buatnya)
- Secangkir Kopi Biar Enak Dikit :v
- Doa Jangan Lupa Coeg Biar Berhasil !
Ok Udah Nggak Sabarkan Langsung Aja Simak Langkahnya Dibawah Ini :
1. Buka Aplikasi VB 6.0 Kemudian Pilih Standard Exe.
2. Rancanglah Form Seperti Dibawah Ini.
Properties Ket.
Shape1 Shape 4 - Rounded Rectangle
Label1 Caption Perhitungan Arithmatika
Label2 Caption Bilangan Kesatu
Label3 Caption Bilangan Kedua
Label4 Caption Hasil Perhitungan
Text1 Text -
Text2 Text -
Text3 Text -
Frame1 Caption Operator
Command1 Caption +
Command2 Caption -
Command3 Caption *
Command4 Caption /
Command5 Caption &New
Command6 Caption &Close
3. Lalu Pilih Menu View , Kemudian Pilih Code
Masukkan Kode Berwarna Merah Dibawah Ini :
Private Sub Command4_Click()
Text3.Text = Val(Text1.Text) / Val(Text2.Text)
End Sub
Private Sub Command6_Click()
Unload Me
End Sub
Private Sub Command3_Click()
Text3.Text = Val(Text1.Text) * Val(Text2.Text)
End Sub
Private Sub Command2_Click()
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
End Sub
Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
Text1.SetFocus
End Sub
Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
Lalu Setelah Selesai Tekan F5 Dan Tadaaa !!!!! Berhasilkan Sob :v
Ok Silahkan Klik Like , Comment And Subscribe Hehe Kayak Youtube Aja :v
Ok Sobat Sekian Dulu Dari Admin ADH !
Tetap Berkilau Anak Indonesia !
Comments