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

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 产品ID查询

共有3955人关注过本帖树形打印复制链接主题：产品ID查询

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/4/23 10:02:00 [只看该作者]

注册1年. 发帖300多. 等于判断不懂? 我没有办法理解你这一年和300多个帖子都做了些什么? 复制别人的代码吗?

tbl.Filter ="编号=222"

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/4/23 10:03:00 [只看该作者]

建议楼主先按部就班看一遍帮助,至少!

seal51

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

加好友

发短信

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

Post By：2014/4/23 10:09:00 [只看该作者]

帮助看了几遍，没看会，只能遇到什么问题，再仔细看帮助，学习，研究，问老师，我在不断的进步，坚持下去会学会的！

谢谢老师的帮助。

tbl.Filter ="编号=222"

这个是不是只能查编号是222的产品，我说的是在文本框里输入任何编号都能准确查询

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/4/23 10:10:00 [只看该作者]

如果是数值类型

tbl.Filter ="编号=" & e.form.contolrs("TextBox1').text

如果是字符串类型

tbl.Filter ="编号='" & e.form.contolrs("TextBox1').text & "'"

seal51

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

加好友

发短信

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

Post By：2014/4/23 10:17:00 [只看该作者]

有这样的学习让老师受累了，谢谢，这些在帮助那里可以找到相关知识呢

seal51

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

加好友

发短信

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

Post By：2014/4/23 10:25:00 [只看该作者]

Dim txt As String = e.Form.Controls("ID查询").Text
Dim tbl As Table = Tables("产品表")
If txt = "" Then
    tbl.Filter = ""
Else
    txt = "'%" & txt & "%'"
     tbl.Filter ="产品ID=" & e.form.contolrs("ID查询').text？？？
End If

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/4/23 10:28:00 [只看该作者]

只要你按部就班看帮助,自然就会发现的了

http://www.foxtable.com/help/topics/1284.htm

狐狸爸爸

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

加好友

发短信

等级：管理员帖子：47449 积分：251065 威望：0 精华：91 注册：2008/6/17 17:14:00

Post By：2014/4/23 10:29:00 [只看该作者]

例子在这里：
http://www.foxtable.com/help/topics/1058.htm

Dim txt As String = e.Form.Controls("ID查询").Text
Dim tbl As Table = Tables("产品表")
If txt = "" Then
     tbl.Filter = ""
Else
     txt = "'产品ID= '" & txt & "'"
     tbl.Filter =txt
End If

[此贴子已经被作者于2014-4-23 10:29:29编辑过]

seal51

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

加好友

发短信

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

Post By：2014/4/23 10:35:00 [只看该作者]

产品ID的数字

Bin

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

加好友

发短信

等级：贵宾帖子：35433 积分：178524 威望：0 精华：3 注册：2013/3/30 16:36:00

Post By：2014/4/23 11:11:00 [只看该作者]

例子在这里：
http://www.foxtable.com/help/topics/1058.htm

Dim txt As String = e.Form.Controls("ID查询").Text
Dim tbl As Table = Tables("产品表")
If txt = "" Then
     tbl.Filter = ""
Else
     txt = "'产品ID= " & txt
     tbl.Filter =txt
End If

下一主题 >> << 上一主题

总数 20 上一页 1 2

主题：产品ID查询