以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  [求助]根据自定义录入界面之四改的代码提示出错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=142158)

--  作者：12397522011 --  发布时间：2019/10/20 0:34:00 --  [求助]根据自定义录入界面之四改的代码提示出错 根据自定义录入界面之四改的代码提示出错 1、参考的代码 此主题相关图片如下：1.png 2、修改后的代码 Dim txt As String = e.Form.DropDownBox.Text Dim tbl As Table = Tables("桥梁汇总表_Table1") If txt = "" Then     tbl.Filter = "" Else     txt = "\'%" & txt & "%\'" MessageBox.Show( txt )     tbl.Filter =  "桥梁名称 Like " & txt & " Or 桥梁代码 Like " & txt  End If e.Form.DropDownBox.Select() \'将输入焦点返回下拉列表框 3、错误提示 此主题相关图片如下：3.png [此贴子已经被作者于2019/10/20 0:45:47编辑过]

--  作者：有点酸 --  发布时间：2019/10/20 9:22:00 --   tbl.Filter =  "桥梁名称 Like " & txt & " Or 桥梁代码 Like " & txt  改为： tbl.Filter =  "桥梁名称 Like \'" & txt & "\' Or 桥梁代码 Like \'" & txt  & "\'" http://www.foxtable.com/webhelp/topics/0102.htm http://www.foxtable.com/webhelp/topics/1647.htm

--  作者：12397522011 --  发布时间：2019/10/20 20:29:00 --   非常感谢，我重新按步骤做了一遍就好了，没发现问题是啥，再次感谢