筛选问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 筛选问题

共有2832人关注过本帖树形打印复制链接主题：筛选问题

有点甜

小大 11楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/9/18 11:34:00 [只看该作者]

例子上传

seal51

小大 12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1837 积分：12984 威望：0 精华：0 注册：2013/6/10 9:23:00

Post By：2014/9/18 12:49:00 [只看该作者]

问题在窗口1的下拉列表的筛选

下载信息 [文件大小：下载次数： ]
点击浏览该文件:管理项目w1w.rar

有点甜

小大 13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/9/18 14:12:00 [只看该作者]

用下面的代码测试一点问题都没有啊

Dim gys As WinForm.ComboBox = e.Form.Controls("供应商")
Tables("订单.订单明细表").Filter = "供应商 = '" & gys.Value & "' and 订单编号='" & Tables("订单明细表").current("订单编号") & "'"

seal51

小大 14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1837 积分：12984 威望：0 精华：0 注册：2013/6/10 9:23:00

Post By：2014/9/18 14:38:00 [只看该作者]

复制到我现有的系统，出现

“.NET Framework 版本：2.0.50727.3655
Foxtable 版本：2014.9.9.1
错误所在事件：窗口,排产主窗口,AfterLoad
详细错误信息：
Invalid parameters for Select method.”

seal51

小大 15楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：八尾狐帖子：1837 积分：12984 威望：0 精华：0 注册：2013/6/10 9:23:00

Post By：2014/9/18 14:40:00 [只看该作者]

现有窗口,排产主窗口,AfterLoad 的代码如下，那个有问题呢？？

Tables("排产主表").ExtendLastCol = True
Tables("排产主表").Filter = "已完成 = false"
'Tables("排产主表.排产明细表").Filter = "已完成 = false"
Tables("排产主表").Select(0, 0)
Tables("排产明细表").Select(0, 0)
Tables("排产主表.排产明细表").Select(0, 0)

Dim zxd As WinForm.CheckBox = forms("排产主窗口").Controls("主勾选")
If zxd.Checked = False Then
Tables("排产主表").Filter = "已完成 = false"
Else
Tables("排产主表").Filter = "已完成 = True"
End If