Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
请问如示范文件表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的值作为最后候选值。谢谢
下载信息 [文件大小: 下载次数: ] | |
![]() |
窗口控件姓名才是我要的控件,只不过代码不全,姓名1控件只不过是我要表达的意思,比如:
输入日期和班别,姓名候选值为A,B,D,E,F,G,H.......姓名1候选值为A,B,C,D,其实我想要的姓名候选值为A,B,D,即姓名候选值和姓名1候选值都有的。谢谢
下载信息 [文件大小: 下载次数: ] | |
![]() |
看不懂。
还是不行,
思路对了。
请帮我完善窗口控件姓名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也有的值作为候选值
还是不行,
思路对了。
请帮我完善窗口控件姓名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也有的值作为候选值
把你的窗口传上来吧,并说明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 ???????