Foxtable(狐表)用户栏目专家坐堂 → 求助


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

主题:求助

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


加好友 发短信
等级:幼狐 帖子:104 积分:1038 威望:0 精华:0 注册:2015/2/9 21:01:00
求助  发帖心情 Post By:2015/3/23 16:17:00 [只看该作者]

问题:
查找客户是 AA 并且未校验部分,把未校验部分修改为校验,在控件里面怎么编写代码


图片点击可在新窗口打开查看此主题相关图片如下:无标题.jpg
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
Bin
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/3/23 16:22:00 [只看该作者]

dim Filter as string 
if e.form.controls("comboBox1").text <> "" then
     Filter="客户='" & e.form.controls("comboBox1").text  & "'"
end if
if e.form.controls("已校验").checked then
if Filter > "" then
   Filter = Filter & " and "
end if
   Filter=Filter & "校验=True"
end if
if e.form.controls("未校验").checked then
if Filter > "" then
   Filter = Filter & " and "
end if
Filter=Filter & "校验=False"
end if
Tables("XX").Filter= Filter

 回到顶部