以文本方式查看主题

-  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=92496)

--  作者:刘林
--  发布时间:2016/11/4 23:20:00
--  表达式
Dim txt As String = e.sender.Text
txt = "\'%" & txt & "%\'"
messagebox.show(txt)
Dim dr As DataRow
Dim po As Integer
dr = DataTables("成绩").Find("[考号] Like & text &") \'从第一行开始查找
po = Tables("上分_table1").FindRow(dr)
If po >= 0 Then \'如果找到
    Tables("上分_table1").Position = po \'选定
End If

请问表达合成哪里不对,谢谢,别见笑




--  作者:y2287958
--  发布时间:2016/11/4 23:33:00
--  
dr = DataTables("成绩").Find("[考号] Like” & text)
--  作者:刘林
--  发布时间:2016/11/5 6:20:00
--  
2楼代码之前试过,就是出现:编译错误:“text”不明确,………………
--  作者:y2287958
--  发布时间:2016/11/5 7:57:00
--  
dr = DataTables("成绩").Find("[考号] Like” & txt)

--  作者:有点蓝
--  发布时间:2016/11/5 9:26:00
--  
表达式合成是基础中的基础,花时间好好看看:http://www.foxtable.com/webhelp/scr/1284.htm