ที่ฟอร์มหลักใน event form open
ใส่โค้ดเพื่อซ่อนซัพฟอร์ม
Private Sub Form_Open(Cancel As Integer)
Me.[ชื่อซัพฟอร์ม].Visible = False
End Sub
หรือ
Form![ชื่อฟอร์มหลัก]![ชื่อซัพฟอร์ม].visible =false
และที่ปุ่มค้นหาเมื่อการค้นหาทำงานก็กำหนดให้
Me.[ชื่อซัพฟอร์ม].visible = True