Membuat project Bonus Pembelian pada visual Basic

 

Membuat Project Bonus Pembelian pada Visual Basic 

 

Pada kesempatan kali ini saya akan menjelaskan tentang project Bonus Pembelian pada Visual basic

Langkah pertama kita siapkan medianya...
lalu kita buat komponen -komponennya pada layar form yang sudah tertera..

Komponen yang diperlukan berupa:

1.textbox = 3

2.label = 3

3.Commandbutton = 1 sepertyi contoh di bawah ini

 

Sebelum ada tampilan seperti gambar di atas pada menu Properties "Caption"  kita ganti nama sesuai yang dibutuhkan...

jika sudah, kita tulis rumus pada komponen "HITUNG BONUS" kita klik 2 kali.

lalu akan muncul tampilan seperti ini

jika sudah,, lalu kita masukan rumusseperti dibawah ini

Private Sub Command1_Click()

If Text1.Text > 200000 Then
Text2.Text = Text1.Text * 0.15
Text3.Text = "gelas cantik"
Else
Text2.Text = Text1.Text
Text3.Text = "tidak ada"
 End If
End Sub

Lalu kita jalan kan program tersebut

jika kita mengisi nominal lebih dari 200000 maka akan menampilkan tampilan seperti dibawah ini

 

Tetapi jika kita mengisi nominal kurang dari 200000 maka akan menampilkan tampilan seperti dibawah ini

 

dan selesailah proses pembuatan project Bonus pembelian pada Visual Basic ...

semoga bermanfaat...

Asalamualaikum warohmatullahi wabarokatuh