Sebagai awal membuat program, sebaiknya anda mencoba membuat program sekuensial, atau penulis mengelompokannya sebagai program sederhana. Artinya, dalam program tidak terdapat pencabangan, pengulangan. Sebagai contoh, Anda membuat program untuk menghitung jumlah pembelian yang dihitung dari harga barang dikali banyak barang yang dibeli.
Sebelum memulainya Anda harus mendesain Form seperti contoh dibawah ini beserta atributnya. untuk lebih lanjut perhatikan gambar Form Program Jual Beli dibawah ini:
Untuk Kode Listingnya:
Public Class Perkalian
Public Class Perkalian
Private Sub Kosong()
txtQty.Text = ” ”
txtHarga.Text = ” ”
txtJml.Text = ” ”
txtQty.Focus()
txtQty.Text = ” ”
txtHarga.Text = ” ”
txtJml.Text = ” ”
txtQty.Focus()
End Sub
Private Sub btnSelesai_Click(sender As Object, e As EventArgs) Handles btnSelesai.Click
End
End Sub
Private Sub btnMulai_Click(sender As Object, e As EventArgs) Handles btnHitung.Click
txtJml.Text = Val(txtQty.Text) * Val(txtHarga.Text)
End Sub
End
End Sub
Private Sub btnMulai_Click(sender As Object, e As EventArgs) Handles btnHitung.Click
txtJml.Text = Val(txtQty.Text) * Val(txtHarga.Text)
End Sub
Private Sub btnBaru_Click(sender As Object, e As EventArgs) Handles btnBaru.Click
Call Kosong()
Call Kosong()
End Sub
End Class
End Class
Untuk Menjalankan program atau file Perkalian, Klik ikon Start Debugging (F5), maka akan muncul keluaran Perkalian seperti berikut.
Masukkan 10 untuk Banyak Barang dan 12400 untuk Harga Barang lalu tekan tombol Hitung, maka akan muncul 124000 pada Jumlah Beli.
Klik tombol Mulai, maka datanya akan dikosongkan.
Tidak ada komentar:
Posting Komentar