| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 怎么查询窗口组合框里的数据 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=146443) |
| -- 作者：wujie -- 发布时间：2020/2/24 10:18:00 -- 怎么查询窗口组合框里的数据 不用选择组合框里的数据进行查询，直接用按钮来依次查询 |
| -- 作者：有点蓝 -- 发布时间：2020/2/24 10:18:00 -- 没看懂。请截图，或者举例说明 |
| -- 作者：wujie -- 发布时间：2020/2/24 10:32:00 -- 用按钮来代替选择组合框 比如一个材料清单，同名称的材料有很多，但是储存的ID号不一样，现在组合框里已经有所有的ID号，现在不需要手动选择组合框里的ID号来查询材料，直接用按钮来依次选择组合框里的ID号来查询材料，用两个按钮，一个按钮点一下就直接查询下一条，一个按钮点一下就直接查询上一条 |
| -- 作者：有点蓝 -- 发布时间：2020/2/24 10:47:00 -- 使用代码控制选择上一项，或者下一项 Dim cmb As WinForm.ComboBox cmb = Forms("窗口1").Controls("ComboBox1") Dim n As Integer = cmb.ComboList.split("|").Length If cmb.SelectedIndex < n -1 Then cmb.SelectedIndex = cmb.SelectedIndex + 1 End If 然后使用组合框的值筛选即可 tables("表A").filter = "ID=\'" & cmb.text & "\'" |
| -- 作者：wujie -- 发布时间：2020/2/24 11:07:00 -- 怎么用文本框显示是查询第几个呢 比如组合框里有10条记录，查询到第五条，怎么用文本框显示5呢 |
| -- 作者：有点蓝 -- 发布时间：2020/2/24 11:11:00 -- cmb.SelectedIndex：http://www.foxtable.com/webhelp/topics/0930.htm 使用到某个控件的时候，建议把这个控件的帮助都仔细看看
|
| -- 作者：wujie -- 发布时间：2020/2/24 11:23:00 -- 这个代码有什么问题吗？查完过后再点按钮就报错了 Dim cmb As WinForm.ComboBox cmb = Forms("主控窗口").Controls("ComboBox1") Dim n As Integer = cmb.ComboList.split("|").Length If cmb.SelectedIndex < n +1 Then cmb.SelectedIndex = cmb.SelectedIndex - 1 End If Tables("生产记录").filter = "ID=\'" & cmb.text & "\'" |
| -- 作者：有点蓝 -- 发布时间：2020/2/24 11:31:00 -- 上一页？ If cmb.SelectedIndex > 0 Then cmb.SelectedIndex = cmb.SelectedIndex - 1 End If |
| -- 作者：wujie -- 发布时间：2020/2/24 11:34:00 -- 好的，谢谢 谢谢蓝老师 |