Salama' Melambi' Sangmane ... !
Kali ini So' Alen memposting Tutorial bagi teman2 masih seputaran tentang VB , Kali ini Tutorialnya yaitu Mambuat Aplikasi Penhitung Harga Barang Dengan Visual Basic By So' Alen .
Berikut langkah-langkahnya , silahkan di coba teman2 , Semoga berhasil :D
1.Buatlah New Project pada software VB anda kemudian tambahkan empat buah kontrol label, empat TextBox dan satu commandButton pada form, kemudian atur letaknya seperti pada gambar berikut :
2.Atur properti caption untuk masing-masing label dan commanButton seperti pada gambar diatas.
3.Klik ganda tombol CommandButton1(proses), kemudian ketikkan kode/listing/script program berikut :
Private Sub Command1_Click()
Dim a, b, c As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
Text4.Text = (a * b) - (a * b * c) / 100
End Sub
Pernyataan Dim adalah untuk mendeklarasikan variabel a, b, dan c dimana variabel tersebut untuk mewakili/menampung nilai yang diketikkan pada text1, text2 dan text3 dengan tipe integer (angka). Jika tombol commandbutton1/tombol proses diklik maka pada text4 akan menampilkan hasil perhitungan antara perkalian nilai yang diketikkan pada text1 dan text2 kemudian dikalikan dengan nilai yang diketikkan pada text3.
4.Jalankan Program dengan menekan tombol F5
6.Simpan hasil proyek Anda dan Selamat mencoba !
Kali ini So' Alen memposting Tutorial bagi teman2 masih seputaran tentang VB , Kali ini Tutorialnya yaitu Mambuat Aplikasi Penhitung Harga Barang Dengan Visual Basic By So' Alen .
Berikut langkah-langkahnya , silahkan di coba teman2 , Semoga berhasil :D
1.Buatlah New Project pada software VB anda kemudian tambahkan empat buah kontrol label, empat TextBox dan satu commandButton pada form, kemudian atur letaknya seperti pada gambar berikut :
Gambar aplikasi penghitung harga barang dengan VB
2.Atur properti caption untuk masing-masing label dan commanButton seperti pada gambar diatas.
3.Klik ganda tombol CommandButton1(proses), kemudian ketikkan kode/listing/script program berikut :
Private Sub Command1_Click()
Dim a, b, c As Integer
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
Text4.Text = (a * b) - (a * b * c) / 100
End Sub
Pernyataan Dim adalah untuk mendeklarasikan variabel a, b, dan c dimana variabel tersebut untuk mewakili/menampung nilai yang diketikkan pada text1, text2 dan text3 dengan tipe integer (angka). Jika tombol commandbutton1/tombol proses diklik maka pada text4 akan menampilkan hasil perhitungan antara perkalian nilai yang diketikkan pada text1 dan text2 kemudian dikalikan dengan nilai yang diketikkan pada text3.
4.Jalankan Program dengan menekan tombol F5
Contoh Gambar Program Penghitung harga Barang dengan VB
6.Simpan hasil proyek Anda dan Selamat mencoba !
Post a Comment