Menggunakan Beberapa Form Dalam DataBase Microsoft Visual Basic 6.0

Syntax Tampil

Syntax ini berfungsi untuk menampilkan data dalam pencarian.

Private Sub TAMPIL()

With DATA_KAMAR

Text1.Text = .Recordset.Fields!NO_KAMAR

Text2.Text = .Recordset.Fields!RUANG

Combo1.Text = .Recordset.Fields!JENIS_KAMAR

Text3.Text = .Recordset.Fields!FASILITAS1

Text4.Text = .Recordset.Fields!FASILITAS2

Text5.Text = .Recordset.Fields!FASILITAS3

Text6.Text = .Recordset.Fields!TARIF

End With

End Sub