主题：调用文本值作条件出错

Dim name  As  String = e.Form.Controls("TextBox1").Text
Dim name1  As  String = e.Form.Controls("TextBox29").Text
Dim name2  As  String = e.Form.Controls("TextBox30").Text
Dim name3  As  String = e.Form.Controls("TextBox31").Text
Dim name4  As  String = e.Form.Controls("TextBox32").Text

Dim txt  As  String = e.Form.Controls("TextBox14").Text
 Dim tbl As Table = Tables(name)
 If txt = "" Then
     tbl.Filter = ""
 Else
     txt = "'%" & txt & "%'"
     tbl.Filter = name1 Like  & txt &  Or name2 Like  & txt &  Or name3 Like  & txt &   Or name4 Like  & txt
 End If

这句要怎样改才不会出错

tbl.Filter = name1 Like  & txt &  Or name2 Like  & txt &  Or name3 Like  & txt &   Or name4 Like  & txt