VISUAL BASIC : MEMBUAT PROGRAM SEDERHANA

MEMBUAT PROGRAM ADMIN HOTEL DENGAN STATMEN PERULANGAN IF

PERTAMA-TAMA BUATLAH PROGRAM MEMAKAI VB.06

 

Pada tombol start anda klik 2x.

Masukan codingan di bawah ini :

 

Private Sub Command1_Click()

Text3.Text = Text1.Text * Text2.Text

If Option1.Value Then

Text6.Text = Text3.Text * 0.3

Else

If Option2.Value Then

Text6.Text = Text3.Text * 0.2

Else

If Option3.Value Then

Text6.Text = Text3.Text * 0.2

End If

End If

End If

Text5.Text = Text3.Text – Text6.Text

End Sub

 

Pada tombol END anda klik 2x

Masukan codingan di bawah ini :

 

Private Sub Command2_Click()

MsgBox “terima kasih telah menginap di hotel kesya”, vbInformation, “hotel kesya”

End

End Sub

 

Pada tombol option 30% anda klik 2x

Masukan codingan di bawah ini :

 

Private Sub Option1_Click()

 

Text4.Text = “diskon 30%”

 

End Sub

 

Pada tombol option 20% anda klik 2x

Masukan codingan di bawah ini :

 

Private Sub Option2_Click()

 

Text4.Text = “diskon 20%”

 

End Sub

 

Pada tombol option 10% anda klik 2x

Masukan codingan di bawah ini :

 

Private Sub Option3_Click()

Text4.Text = “diskon 10%”

End Sub

SETELAH ANDA SELESAI MEMBUAT PROGRAM MAKA JALANKAN PROGRAM MAKA AKAN MUNCUL :

SETELAH SELESAI ANDA BISA MEMASUKAN JUMLAH ANGKA JIKA MENDAPATKAN DISKON KLIK SALAH SATU DISKON UMUMNYA.

Semoga dengan menuliskan cara membuat program sederhana ini bermanfaat untuk anda,

3 thoughts on “VISUAL BASIC : MEMBUAT PROGRAM SEDERHANA

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s