以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 查找窗口提示字符串到long 无效, 这是什么问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=158399) |
-- 作者:gv2000 -- 发布时间:2020/11/18 20:30:00 -- 查找窗口提示字符串到long 无效, 这是什么问题 Dim s1 As String = e.Form.Controls("类别").text Dim ss1 As String = "类别 = "& s1 &"" Dim s2 As String = e.Form.Controls("物料种类").text Dim ss2 As String = "物料种类 = "& s2 &"" Dim s3 As String = e.Form.Controls("物料代码").text Dim ss3 As String = "物料代码 like "& s3 &"" Dim s4 As String = e.Form.Controls("客户").text Dim ss4 As String = "客户 = "& s4 &"" Dim s5 As String = e.Form.Controls("客人编号").text Dim ss5 As String = "客方编号 like "& s5 &"" Dim s6 As String = e.Form.Controls("规格型号").text Dim ss6 As String = "规格型号 Like "& s6 &"" Dim s7 As String = e.Form.Controls("FSC声明").text Dim ss7 As String = "FSC声明 = "& s7 &"" Dim s8 As String = e.Form.Controls("存放仓库").text Dim ss8 As String = "存放仓库 = "& s8 &"" Tables("物料").filter = ss1 And ss2 And ss3 And ss4 And ss5 And ss6 And ss7 And ss8 Forms("物料查找窗口").close |
-- 作者:有点蓝 -- 发布时间:2020/11/19 8:39:00 -- 使用这种方式生成查询条件:http://www.foxtable.com/webhelp/topics/1058.htm |