《开发宝典》P464下部代码
If e.KeyCode = Keys.Enter Then
Dim s As String = e.Sender.Text
Dim f As String
Dim ss As String() = s.Split(",")
For Each t As String In ss
f = f & "or 产品名称 Like ' % " & t & " % ' "
Next
f = f.Remove(0,4)
With DataTables("查询")
.LoadFilter = f
.Load()
End With
End If
运行后 显示 “错误所在事件：加载[查询]失败! 详细错误信息：
至少一个参数没有被指定值。”
感谢，版主 @有点甜 我知道了
f = f.Remove(0,4) 是用来移除
f = f & "or 产品名称 Like ' % " & t & " % ' " 这查询语句 最终查询时多余的"空格or空格 的
但是。。。 经过修改之后，错误是不报了，但是按下Enter 后没有了任何反应。
晕！！！
[此贴子已经被作者于2019/1/27 12:18:59编辑过]
加好友 
发短信
Post By：2019/1/24 19:31:00 [显示全部帖子]
