Pada postingan sebelumnya kita sudah membahas program sederhana mengubah warna text dan juga tulisan dengan menggunakan bahasa pemrograman visual basic 6.0, kali ini admin akan berbagi sedikit penggunaan proses matematika atau bisa juga dikatakan kalkukator sederhana dengan menggunakan bahasa pemrograman visual basic 6.0.
langakah pertama adalah sobat buat form terlebih dahulu
Untuk souce code atau listing program tombol kali (X) , sobat klik 2 kali tombol kali tersebut dan pastekan code berikut
Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a * b
End Sub
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a * b
End Sub
source code untuk tombol bagi (/)
Private Sub Command2_Click()
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a / b
End Sub
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a / b
End Sub
source code untuk tombol tambah (+)
Private Sub Command3_Click()
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a + b
End Sub
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a + b
End Sub
Source code untuk tombol kurang (-)
Private Sub Command4_Click()
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a - b
End Sub
Dim a As Integer
Dim b As Integer
a = Val(Text1)
b = Val(Text2)
Text3 = a - b
End Sub
setelah selesai pembuatan semua codenya jalankan program kalkulator sederhana tersebut, semoga bermanfaat.
Makasih, ini juga sudah tak coba dan berhasil
ReplyDelete