IPI PEKANBARU

Untitled Document

Pekanbaru » Posting »

Membuat Form Pemesanan Kamar | visual basic 6.0

Tutor by: RADINAL SIMAMORA dibaca:7912 kali, Posted on 2013-01-25 15:25:57

Syaloom sobat.., gmna ne kbar nya..? lanjut lagi dari cerita membuat 2 jenis pilihan huruf beralih ke pembuatan form pesanan kamar.
Perlu diketahui sobat, untuk membuat aplikasi ini, kita harus menggunakan variabel untuk mempersingkat rumus, klo tidak ya gak bakalan siap-siap ne..!
Bedanya di “option explicit”, coba sobat simak post dibawah ya :
1..>> 2..>> 3..>>

Hotel Radinal of sChudetho

Form Pesanan Kamar

1. Buka Program Visual Basic 6.0 anda >> new project
2. Silahkan buat 2 label untuk Nama Perusahaan
5 label untuk keterangan
4 text box
2 frame
3 option button
7 check box

3. Atur sedemikian bagus, perhatikan contoh berikut :

4. Masukkan kode berikut +copy/-paste:

Option Explicit
Dim hrgbayar As Long
Dim hrglamahari As Long

Private Sub cmdok_Click()
hrgbayar = 0
hrglamahari = 0

If opta.Value = True Then
hrgbayar = 200000
End If
If optb.Value = True Then
hrgbayar = 300000
End If
If optc.Value = True Then
hrgbayar = 400000
End If

hrglamahari = chksenin + chkselasa + chkrabu + chkkamis + chkjumat + chksabtu + chkminggu

txttb.Text = hrgbayar * hrglamahari * txtjumlah.Text

End Sub

*catatan : nama sudah diset terlebih dahulu, cth : Jumlah kamar >> txtjumlah.text

5. Setelah selesai, klik tombol “PLAY”
6. Lihat Hasil Nya :