Source Code VB

Buat form sbb:

command1 beri nama Proses

Text1 beri nama Nil1

Text2 beri nama Nil2

Text3 beri nama Nil3

Label1 beri simbol - (strip / minus)

Label2 beri simbol = (sama dengan)

catat code dibawah ini

Ketik Code dibawah ini:Private Sub Command1_Click()

Text3 = Val(Text1.Text) - Val(Text2.Text)

End Sub

‘operasi penambahan pada vb
‘create : Peter Elisa
‘date : 02/01/2006

Buat:
a.1 Buah button command
b.2 buah label + dan =
c.3 buah text

dan buat code seperti dibawah ini:

Private Sub Command1_Click()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub

Penjelasan:
Hasil dan penjumlahan didapat setelah tombol command di klik
baru hasil penjumlahan akan muncul di text hasil.
Fungsi Val dan text1 dan text2 ingin menunjukkan nilai yang akan
di jumlahkan, tetapi jika tidak menggunakan val makan hasilnya akan
berbeda, yaitu tidak menunjukkan hasil penjumlahan tetapi pengambungan dari ke-2
nilai tersebut.

contoh:
jika nilai dimasukkan di text1=1 dan text2=2 maka hasilnya akan menjadi 3 -> proses menggunakan val
jika nilai dimasukkan di text1=1 dan text2=2 maka hasilnya akan menjadi 12 ->tanpa menggunakan val