Program VB (Kalkulator Sederhana)
Assalamua'alaikum..Dengan program Visual Basic, kita bisa membuat kalkulator sederhana sendiri loh..
Caranya mudah kok, berikut saya berikan listing program untuk membuat kalkulator sederhana..
Pertama-tama, kita harus merancang sendiri form kalkulator yang kita inginkan. Contohnya seperti dibawah ini..
Setelah itu, isi listing programnya seperti ini..
Private Sub Command1_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 Command3_Click()
Text3.Text = Val(Text1.Text)*Val(Text2.Text)
End Sub
-------------------------------------------------
Private Sub Command4_Click()
Text3.Text = Val(Text1.Text)/Val(Text2.Text)
End Sub
-------------------------------------------------
Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
-------------------------------------------------
Private Sub Command6_Click()
MsgBox ("Apakah Anda Yakin Ingin Keluar dari Program?"), vbYesNo
Unload Me
End Sub
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 Command3_Click()
Text3.Text = Val(Text1.Text)*Val(Text2.Text)
End Sub
-------------------------------------------------
Private Sub Command4_Click()
Text3.Text = Val(Text1.Text)/Val(Text2.Text)
End Sub
-------------------------------------------------
Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
-------------------------------------------------
Private Sub Command6_Click()
MsgBox ("Apakah Anda Yakin Ingin Keluar dari Program?"), vbYesNo
Unload Me
End Sub
Nah, Jika sudah selesai, klik tombol run untuk menjalankan program yang telah kita buat tadi. Contoh outputnya seperti ini..
Mudah sekali bukan?
Selamat mencoba..
Semoga bermanfaat..
#practice make perfect
join balek ke blog aku ya
BalasHapushttp://anekatjeh.blohspot.com