الصق هذا الكود في محرر الفيجوال الخاص بالنموذج الذي يوجد به مربع النص
Private Sub text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
DoCmd.OpenForm "frm1"
End Sub
باعتبار text1 هو اسم مربع النص و frm1 هو اسم النموذج الذي تريد فتحه