- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 查询按钮的代码 数据表不显示查询结果 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=51067)
-- 发布时间：2014/5/19 10:54:00
-- 查询按钮的代码 数据表不显示查询结果
请帮忙看看我的代码问题出在哪里？谢谢
故障现象：主表全部数据显示，条件给了后，点击查询按钮 主表不显示查询结果，结果是空的：
查询按钮代码如下：
Dim wllx As WinForm.ComboBox = e.Form.Controls("物料类型")
Dim wlmc As WinForm.ComboBox = e.Form.Controls("物料名称")
Dim wlxh As WinForm.TextBox = e.Form.Controls("物料型号")
Dim wlgg As WinForm.TextBox = e.Form.Controls("物料规格")
Dim ghcj As WinForm.ComboBox = e.Form.Controls("供货厂家")
Tables("物料信息表").Filter="类型= \'" & wllx.text & "\' And 名称= \'" & wlmc.text &"\' And 型号 Like \'*" & wlxh.text & "*\' and 规格 like \'* " & wlgg.text & "*\' And 厂家=\'" & ghcj.text &"\'"
-- 发布时间：2014/5/19 10:55:00
--
说明没有符合条件的数据.
而且你这样编写代码也不够科学
参考帮助
-- 发布时间：2014/5/19 14:45:00
--
查询条件 操作
此主题相关图片如下：qq图片20140519144326.jpg
此主题相关图片如下：qq图片20140519144357.jpg
有正确的显示 就是查询按钮出来空白表
-- 发布时间：2014/5/19 14:49:00
--
上个例子看看,文件发上来. 怎么你表行号都不见了? 是不是试用版过期了.
-- 发布时间：2014/5/19 14:54:00
--
误操作 删除干净了 是试用版 昨天才又安装了一次
-- 发布时间：2014/5/19 14:54:00
--
重新安装不会延长试用期的哦, 先把文件发上来我测试看看吧
-- 发布时间：2014/5/19 14:55:00
--
根据你的这句代码
Tables("物料信息表").Filter="类型= \'" & wllx.text & "\' And 名称= \'" & wlmc.text &"\' And 型号 Like \'*" & wlxh.text & "*\' and 规格 like \'* " & wlgg.text & "*\' And 厂家=\'" & ghcj.text &"\'"
你必须填入至少 类型、名称、厂家，而且正确，才能查询到值的。
用2楼的方法做查询吧，那样才规范。
[此贴子已经被作者于2014-5-19 14:55:35编辑过]
-- 发布时间：2014/5/19 14:57:00
--
物料信息还没有正式录入 乱填的 等这个做好了 再开始正确录入
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.rar |
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:物料信息.xls |
-- 发布时间：2014/5/19 14:59:00
--
回复8楼，请参考这里来做 http://www.foxtable.com/help/topics/1058.htm