我编的一个程序中，在文本框中输入户主姓名，在户主信息中要出现该户主的详细信息，但当输入错误时，会出现
实时错误‘3077’
字符串的语法错误
的对话框，提示键入的表达式无效，并须退出程序后重新启动应用程序，怎样才能让出现错误时不用退出程序呢？
谢谢各位大虾赐教！

源程序中，相关代码如下：
Private Sub Text1_Change(Index As Integer)
name4$ = Text1(2).Text
Data4.Recordset.FindFirst "户主姓名=" & "'" & name4$ & "'"
End Sub

要让文本框中输入出现错误时不用退出程序，代码应如何修改呢？
请赐教！谢谢！

谢谢PcrazyC指教