Foxtable(狐表)用户栏目专家坐堂 → 查找窗口提示字符串到long 无效, 这是什么问题


  共有2879人关注过本帖树形打印复制链接

主题:查找窗口提示字符串到long 无效, 这是什么问题

帅哥哟,离线,有人找我吗?
gv2000
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:58 积分:492 威望:0 精华:0 注册:2020/11/10 11:34:00
查找窗口提示字符串到long 无效, 这是什么问题  发帖心情 Post By:2020/11/18 20:30:00 [显示全部帖子]

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

 回到顶部