请问如示范文件表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的值作为最后候选值。谢谢
[此贴子已经被作者于2010-9-28 21:59:48编辑过]