[求助]以下代码为什么不能实现功能 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

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年度的都出来了）的学生信息。

当输入框为空时，却可以显示当年的学生信息。

请问这是什么原因？问题在哪里？

主题：[求助]以下代码为什么不能实现功能