Foxtable(狐表)用户栏目专家坐堂 → 复选组合框候选值问题


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

主题:复选组合框候选值问题

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


加好友 发短信
等级:三尾狐 帖子:790 积分:5677 威望:0 精华:0 注册:2009/4/17 18:42:00
复选组合框候选值问题  发帖心情 Post By:2010/9/28 21:13:00 [只看该作者]

请问如示范文件表A窗口1,窗口姓名候选值代码:

Dim cmb As WinForm.CheckedComboBox = e.Sender
Dim str1 As Date = e.Form.Controls("日期").Value
cmb.ComboList = DataTables("表A").GetComboListString("姓名", "  日期 = #" & str1 & "# and 出勤工时 Is  Null   ")

窗口控件姓名1的候选值代码:

Dim cmb As WinForm.CheckedComboBox = e.Sender
Dim str1 As Date = e.Form.Controls("日期").Value
Dim str2 As String = e.Form.Controls("班别").Value
cmb.ComboList = DataTables("表A").GetComboListString("姓名", "  日期 > #" & str1.AddDays(-5) & "# and 班别 = '" & str2 & "' ")

怎样实现两个代码候选值筛选条件和在一起,即在控件姓名筛选以后,再筛选出符合控件姓名1的值作为最后候选值。谢谢

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目27.table

[此贴子已经被作者于2010-9-28 21:59:48编辑过]

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


加好友 发短信
等级:三尾狐 帖子:790 积分:5677 威望:0 精华:0 注册:2009/4/17 18:42:00
  发帖心情 Post By:2010/9/28 21:37:00 [只看该作者]

即“既满足姓名的筛选又满足姓名1的筛选作为候选值

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2010/9/28 23:31:00 [只看该作者]

看了n时,没理解过来~~~   , 愚顿啊``````

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


加好友 发短信
等级:三尾狐 帖子:790 积分:5677 威望:0 精华:0 注册:2009/4/17 18:42:00
  发帖心情 Post By:2010/9/29 [只看该作者]

窗口控件姓名才是我要的控件,只不过代码不全,姓名1控件只不过是我要表达的意思,比如:

输入日期和班别,姓名候选值为A,B,D,E,F,G,H.......姓名1候选值为A,B,C,D,其实我想要的姓名候选值为A,B,D,即姓名候选值和姓名1候选值都有的。谢谢


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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2010/9/29 1:20:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:复选组合框候选值问题.rar


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


加好友 发短信
等级:三尾狐 帖子:790 积分:5677 威望:0 精华:0 注册:2009/4/17 18:42:00
  发帖心情 Post By:2010/9/29 8:25:00 [只看该作者]

谢谢mr725兄,但是好像不对,表中24-27号已填写完毕,如果现在要填写28好的,控件日期输入28号,班别选择各班别,姓名按要求出现候选值,如班别选车床白班,姓名应出现候选值A,B;如班别选车床晚班,姓名应出现候选值DE,F;谢谢
[此贴子已经被作者于2010-9-29 8:24:59编辑过]

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


加好友 发短信 一级勋章 三级勋章 二级勋章
等级:超级版主 帖子:6318 积分:33945 威望:0 精华:10 注册:2008/8/31 20:56:00
  发帖心情 Post By:2010/9/29 9:57:00 [只看该作者]

看不懂。

[此贴子已经被作者于2010-9-29 10:14:06编辑过]

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2010/9/29 12:18:00 [只看该作者]

蒙一下看:

 选择日期和班别后,姓名2控件直接得出结果。(不需要再选择 姓名 和 姓名1 了)

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:复选组合框候选值问题 org .rar


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


加好友 发短信
等级:三尾狐 帖子:790 积分:5677 威望:0 精华:0 注册:2009/4/17 18:42:00
  发帖心情 Post By:2010/9/29 15:34:00 [只看该作者]

还是不行,

思路对了。

请帮我完善窗口控件姓名Enter事件代码:谢谢

Dim m1,m2 As String
Dim cmb As WinForm.CheckedComboBox = e.Sender
Dim str1 As Date = e.Form.Controls("日期").Value
Dim str2 As String = e.Form.Controls("班别").Value
m1 = DataTables("表A").GetComboListString("姓名", "日期 = #" & str1 & "# And 出勤工时 Is Null")
m2 = DataTables("表A").GetComboListString("姓名", "( 日期 > #" & str1.AddDays(-5) & "# And 班别 = '" & str2 & "'")
cmb.ComboList = 'm1有并且m2也有的值作为候选值

[此贴子已经被作者于2010-9-29 15:37:20编辑过]

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:5154 积分:31434 威望:0 精华:8 注册:2008/9/8 12:27:00
  发帖心情 Post By:2010/9/29 16:04:00 [只看该作者]

以下是引用wqc360在2010-9-29 15:34:00的发言:

还是不行,

思路对了。

请帮我完善窗口控件姓名Enter事件代码:谢谢

Dim m1,m2 As String
Dim cmb As WinForm.CheckedComboBox = e.Sender
Dim str1 As Date = e.Form.Controls("日期").Value
Dim str2 As String = e.Form.Controls("班别").Value
m1 = DataTables("表A").GetComboListString("姓名", "日期 = #" & str1 & "# And 出勤工时 Is Null")
m2 = DataTables("表A").GetComboListString("姓名", "( 日期 > #" & str1.AddDays(-5) & "# And 班别 = '" & str2 & "'")
cmb.ComboList =  'm1有并且m2也有的值作为候选值

[此贴子已经被作者于2010-9-29 15:37:20编辑过]

把你的窗口传上来吧,并说明1、2、3、。。。。。   别叫咱总是猜想~

 

        这是m1的                                    这是m2的                你要的结果是什么

A|B|D|E|F|H|L|N|P|Q|R|S|T|U|V|X|Y      F|G|H                    ???????
A|B|D|E|F|H|L|N|P|Q|R|S|T|U|V|X|Y      K|L|M|N|O             ??????????????
A|B|D|E|F|H|L|N|P|Q|R|S|T|U|V|X|Y      Q|T|U|V|W|Y         ???????

[此贴子已经被作者于2010-9-29 16:28:49编辑过]

 回到顶部
总数 20 1 2 下一页