Kamis, 26 Desember 2013

Kalkulator Sederhana Lewat VB 6

Assalamualaikum Wr Wb
Sobat Rizqy Share, gimana kabar agan agan semua ? baik baik saja kan? pasti jawabannya baik saja kok! hehehehehe

Apakah agan ingin membuat aplikasi seprti gambar di bawah ini?

Ok sekarang ane mau jelasin bagaimana caranya membuat kalkulator sederhana lewat Visual basic 6 atau lebih dikenal dengan istilah VB 6
1.Pertama kita buka program visual basic terlebih dahulu.
2.Klik Gambar Label dimenu General yang terletak di sebelah kiri kemudian klik Label tersebut dan isikan dengan nama "Kalkulator" yang terletak di menu Properties sebelah kanan.
3.Lakukan langkah ke 2 untuk membuat label "angka 1, angka 2 , hasil" seperti gambar di bawah ini

4.Setelah itu Klik Gambar TextBox kemudian buatlah 3 textbox seperti gambar dibawah ini:

5.Klik Gambar CommandButton kemudian buatlah 5 CommandButton seperti gambar dibawah ini
*Keterangan
tanda "+" Command1
tanda "-" Command2
  tanda "X" Command3 
tanda ":" Command4 
         tanda "Hapus" Command5 
Option Explicit
Dim Angka1, Angka2, Hasil As Integer

Private Sub Command1_Click()
Angka1 = Val(Text1.Text)
Angka2 = Val(Text2.Text)
Hasil = Angka1 + Angka2
Text3.Text = Str(Hasil)
End Sub

Private Sub Command2_Click()
Angka1 = Val(Text1.Text)
Angka2 = Val(Text2.Text)
Hasil = Angka1 - Angka2
Text3.Text = Str(Hasil)
End Sub

Private Sub Command3_Click()
Angka1 = Val(Text1.Text)
Angka2 = Val(Text2.Text)
Hasil = Angka1 * Angka2
Text3.Text = Str(Hasil)


End Sub

Private Sub Command4_Click()
Angka1 = Val(Text1.Text)
Angka2 = Val(Text2.Text)
Hasil = Angka1 / Angka2
Text3.Text = Str(Hasil)
End Sub

Private Sub Command5_Click()
Text1.Text = ""
Text2.Text = ""
Text3.Text = ""
End Sub
'
6.Simpan dan jalankan dengan tekan F5 atau tekan  

Dan jadilah Kalkulator sederhana yang anda buat.

Apabila agan ingin mencoba punya ane silahkan download Aplikasi Perkantoran (2 Kb)
Sekian posting tentang membuat aplikasi kalkulator sederhana
Wassalamualaikum Wr Wb


0 komentar:

Posting Komentar