- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 第一课的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=30949)
-- 发布时间：2013/4/7 14:56:00
-- 第一课的问题
过滤出的数量应该少于总的数量，可我过滤后的数字反而变大；
清空查询条件后再查询总的数量变得更大？
-- 发布时间：2013/4/7 14:57:00
--
纸上不谈兵，请做个例子发上来，然后说明遇到的问题，我们帮您看看。
-- 发布时间：2013/4/7 15:03:00
-- 如何发图？
如何发图？我把图贴在Word文档上，可被告知格式不对。
-- 发布时间：2013/4/7 15:11:00
--
此主题相关图片如下：导入后的总数是106个.gif
此主题相关图片如下：输入查询条件后查询却有115个.gif
此主题相关图片如下：清空查询条件恢复初始状态反而变成318个。.gif
-- 发布时间：2013/4/7 15:13:00
--
最好把例子发出来. 看图目测有可能是导入的时候是已经经过筛选的了.或者是隐藏了部分行
-- 发布时间：2013/4/7 15:13:00
--
按钮：料号查询的代码：
Dim cj As WinForm.ComboBox = e.Form.Controls("厂家")
Dim wlmc As WinForm.ComboBox = e.Form.Controls("物料名称")
Dim wlbh As WinForm.TextBox = e.Form.Controls("物料编号")
Dim xhgg As WinForm.TextBox = e.Form.Controls("型号规格")
Tables("物料信息").Filter="供货厂家 = \'" & cj.Text & "\' and 物料名称 = \'"& wlmc.Text & "\' and 物料编号 like \'*" & wlbh.Text & "*\' and 型号规格 like \'*" & xhgg.Text & "*\'"
按钮：清空的代码
Dim cj As WinForm.ComboBox = e.Form.Controls("厂家")
Dim wlmc As WinForm.ComboBox = e.Form.Controls("物料名称")
Dim wlbh As WinForm.TextBox = e.Form.Controls("物料编号")
Dim xhgg As WinForm.TextBox = e.Form.Controls("型号规格")
cj.Text = ""
wlmc.Text = ""
wlbh.Text = ""
xhgg.Text = ""
Tables("物料信息").Filter = ""
-- 发布时间：2013/4/7 15:16:00
--
你原本总数是不是就有318个
-- 发布时间：2013/4/7 15:58:00
--
106个
-- 发布时间：2013/4/7 16:04:00
--
发例子吧.我估计你可能在某个事件里写了加载的代码.然后你执行的操作都触发了加载. 2个步骤额外加载了2次 所以你行数是原来的3倍 318条记录..最好把项目发出来. 或者你操作多几次.看看是不是数据一直这样翻倍.如果是说明证实了我的猜想,检查一下代码就好了.
-- 发布时间：2013/4/7 16:10:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:第一课.table |