Kamis, 05 April 2012

Calculator VB V.N.BIM



 
Nama : Muhamad Najib Bulloh 

    Kelas : X-B (Informatica)SMK Bina Insan Mulia

ini adalah calculator yang saya bikin sendiri dari hasil aplikasi Visual basic yang dia ajar kan guru saya kalkulator ini sangat sederhana hanya terdapat sedikit tombol di sana dan kalkulator ini sangat fiksi (tidak nyata ) dan claculator ini tidak dapat di bawa kemana mana saja
jika kalian ingin menampilkan angka angka copy/paste kan koding ini :

Private Sub Angka(Index)_Click()
If Operator = "" Then
    Data1 = Data1 + angka(Index).Caption
Else
    Data2 = Data2 + angka(Index).Caption
End If
Screen.Text = Screen.Text + angka(Index).Caption

End Sub

Akan tetapi koding di atas bukan untuk langsung menampilkan angka akan tetapi untuk menyortir terlebih dahulu mana data1 dan mana data2,jika untuk menampilkan angka :

Screen.text = Screen.text + Angka(Index).caption

-selamat mencoba-




1 komentar: