Board logo

标题: [求助] VB6.0如何实现用text框输入达到查询access数据库? [打印本页]

作者: gushang    时间: 2011-3-16 18:56     标题: VB6.0如何实现用text框输入达到查询access数据库?

小弟弄了VB二级看,也没有看明白,困扰多日,请高手指点:

access 数据库 cs.mdb,里面的表cs1,表的内容:
编码     车辆         标号        大写字母       小写字母
1       汽车         122       QC           qc
2       摩托车       111        MTC          mtc
3       施工车       211       SGC          sgc

想实现:在窗体上text1.text内输入122,点查询命令按钮,text2.text中显示汽车

       在窗体上text1.text内输入QC或者qc或者汽车,点查询命令按钮,text2.text中显示122

烦请解答的高手,将详细的操作步骤和代码告知,非常感谢!
(习惯在SIS论坛了,从来没有到过别的编程论坛,请见谅)
作者: 大地飞鹰999    时间: 2011-3-16 19:16

这个应该用按钮功能就行了吧?VB好多年不用了。
作者: moving_hands    时间: 2011-3-16 19:46

啊哦,没用过vb

按钮添加单击事件,用sql从数据库取出数据,然后更新到text2。

可以用odbc连接数据库吧

select * from cs1 where 编码=1
作者: _dearee_    时间: 2011-3-17 00:07

比較簡單的做法是再加一個 combo box(cb1) 为搜索类型 ,让用户选择是搜索 车辆 还是 标号

if cb1.value = 车辆 then
query=SELECT 车辆 FROM cs1 WHERE 标号= text1.text
else
query=SELECT  标号 FROM cs1 WHERE 大写字母=text1.text OR 小写字母=text1.text

另一做法是不加cb , 先搜索车辆 如果 没结果 再搜索 标号。
作者: link_jing    时间: 2011-3-18 23:08

这个问题很简单啊,把TEXT2和查询结果绑定就可以了。
作者: hzhuashao    时间: 2011-3-19 00:22

我看到那些数字头晕,这辈子就怕这些




欢迎光临 SiS001! Board - [第一会所 关闭注册] (http://67.220.91.19/forum/) Powered by Discuz! 7.2