以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp) --  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2) ----  [求助]以下代码为什么不能实现功能  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=159024)

--  作者：jjjeyes --  发布时间：2020/12/10 23:26:00 --  [求助]以下代码为什么不能实现功能 Dim txt As String = e.Form.Controls("TextBox1").Text Dim tbl As Table = Tables("测试成绩录入_Table1") If txt = "" Then     tbl.DataTable.loadFilter = "[年度] = \'" & Date.today.year & "\'"     tbl.DataTable.load Else     txt = "\'%" & txt & "%\'"     tbl.DataTable.loadFilter = "[年度] = \'" & Date.today.year & "\' And [学号] Like " & txt & " Or [姓名] Like " & txt     tbl.DataTable.load End If 以上代码是为了加载今年的输入框里的学号的学生，可是输入学号后，却出现了所有年度（2020,2019,2018年度的都出来了）的学生信息。 当输入框为空时，却可以显示当年的学生信息。 请问这是什么原因？问题在哪里？

--  作者：hanlingli111999 --  发布时间：2020/12/11 7:49:00 --   问谁呢，也不叫老师

--  作者：有点蓝 --  发布时间：2020/12/11 8:35:00 --   tbl.DataTable.loadFilter = "[年度] = \'" & Date.today.year & "\' And ([学号] Like " & txt & " Or [姓名] Like " & txt & ")"

--  作者：jjjeyes --  发布时间：2020/12/11 23:13:00 --   谢谢老师，原来如此，问题解决了