Sunday 25 October 2015

Program "Kalkulator Sederhana" pada Visual Basic

Ini adalah Program "Kalkulator Sederhana" pada Visual Basic
cara membuatnya :
  1. buka software Visual Basicnya
  2. Pilih menu yang standard.exe saja
  3. design formnya seperti gambar dibawah ini :
  4. Isi kodingannya seperti ini
Private Sub cmdbagi_Click()
txthasil = Val(txtnilai1) / Val(txtnilai2)
End Sub

Private Sub cmdinput_Click()
txtnilai1.Text = ""
txtnilai2.Text = ""
txthasil.Text = ""
txthasil.SetFocus
End Sub

Private Sub cmdkali_Click()
txthasil = Val(txtnilai1) * Val(txtnilai2)
End Sub

Private Sub cmdkeluar_Click()
p = MsgBox("Apakah Anda Ingin Keluar", vbQuestion + vbOKCancel, "Informasi")
If p = vbOK Then
End
End If
End Sub

Private Sub cmdkurang_Click()
txthasil = Val(txtnilai1) - Val(txtniali2)
End Sub

Private Sub cmdtambah_Click()
txthasil = Val(txtnilai1) + Val(txtnilai2)
End Sub

No comments:

Post a Comment