连接数据库的一个简单的查询，急求解决答案

Question

一个界面上有一个文本框（txt1），一个按钮(cmd1)，在文本框中输入内容，然后点击按钮，数据库是ACCESS的
至于里面的数据库结构什么样都可以
现在要写一段代码，实现根据文本框的内容到数据库搜索符合指定条件的记录
急求解决    真诚的希望得到您的帮助

Answer 1

select 要找的项目 form 表名字 where 木项=text1.text
就行了啊

Answer 2

private sub command1_click()
adodc1.recordsource=text1.text
adodc1.refresh
end sub

Answer 3

select 要找的项目 form 表名字 where 木项=text1.text
就行了啊
是啊

Answer 4

非常感谢大家的帮助，但是现在我想弄明白的是，这个查询的select语句能写出来，如何在VB中写代码让查询得以执行，好象是通过什么记录集填充数据，在把得到的记录集填充到能显示查询结果的控件中，这里面的语句希望大家能帮我写一下。谢谢了先

Answer 5

定義一個數據集 Dim Rst As ADODB.Recordset
 Rst.CursorLocation = adUseClient
 Rst.Open Sql, Cn, adOpenStatic, adLockPessimistic
再添加一個DataGrid控件
Set DataGrid1.DataSource = Rst

Answer 6

推荐使用 Microsoft ActiveX Data Object Library,在VB菜单[工程]->[引用]中引用
1.引入后,创建Connection 和 Recordset 对象,其中Connection代表用户程序到DBMS的连接,Recordset代表一次查询所获得的记录集.Dim con as New Connection
Dim rst as New Recordset2.然后在适当的地方连接到数据库
con.open "连接串"
(关闭用 con.close)
关于这个连接串,有很多中方式获得,介绍一种简单的:
打开"记事本",然后"另存为",随便选个路径，文件名输"随意.udl"(注意:包含引号).
找到这个"随意.udl"文件，双击他，跑出来个“数据库连接属性对话框”,选"提供程序"选项卡
由于是ACCESS数据库，选OLEDB 提供程序为"Microsoft Jet X.0 OLE DB Provider",[下一步],来到
"连接"选项卡，填好mdb文件和账号信息后点下面的[测试连接],OK后就关闭这个窗口.
用记事本打开"随意.udl"文件，里面第二行就是"连接串"了,粘贴到con.open 中.3.用Rescordset对象的Open方法执行SQL语句查询表.
rst.open "SQL 语句",con,打开方式，锁类型
这个SQL语句可以临时拼凑出来
如:
Dim strSql as String
strSql = "SELECT * From 表 Where id = '" + Trim(Text1.text) + "'"
rst.open strSql,con,adOpenDynamic,adLoceOptimistic4.显示结果
用rst.Field("字段名")
或rst.Field(index)
或rst!字段名
etc
可以访问当前记录指定字段的值
若要移到下一字段用 rst.MoveNext就行了,比如:
While NOT rst.EOF
   print rst.Field("学号"),rst.Field("姓名")
   rst.MoveNext
Wend用完后，rst.close 关闭记录.

Answer 7

非常感谢楼上的老师对我的如此细腻的帮助
但是我在使用上面的代码编写程序时
还是发生了我极不愿意看到的东西
当我在使用“rst.open strSql,con,adOpenDynamic,adLoceOptimistic”语句时
在运行的时候却报错“好象是类型不匹配”
我弄不明白是什么原因
所以还想请大家能够给我帮助

Answer 8

另外我的机器也是不争气
偏偏在这个时候出问题
我每次要运行程序的时候
弹出一个对话框
“xxx内存所指的xxx内存不能为read,如果终止程序请按'确定'，如果调试程序请按'取消'”
我也是弄不明白这是什么原因
想请教各位老师能够给我指点迷津

Answer 9

当我在使用“rst.open strSql,con,adOpenDynamic,adLoceOptimistic”语句时
在运行的时候却报错“好象是类型不匹配”很抱歉由于上面所写的语句没经过调试,你可以参阅MSDN关于ADO的讲解,上面的"AdLoceOptimistic"拼写错误.应该写成rst.open strSql,con,adOpenDynamic,adOpenOptimistic最好到网上查找关于ADO编成的资料,因为Open方法的"游标类型"和"锁类型"还有很多细节需要掌握.

Answer 10

当我在使用“rst.open strSql,con,adOpenDynamic,adLoceOptimistic”语句时
在运行的时候却报错“好象是类型不匹配”很抱歉由于上面所写的语句没经过调试,你可以参阅MSDN关于ADO的讲解,上面的"AdLoceOptimistic"拼写错误.应该写成rst.open strSql,con,adOpenDynamic,adOpenOptimistic最好到网上查找关于ADO编成的资料,因为Open方法的"游标类型"和"锁类型"还有很多细节需要掌握.

Answer 11

当我在使用“rst.open strSql,con,adOpenDynamic,adLoceOptimistic”语句时
在运行的时候却报错“好象是类型不匹配”很抱歉由于上面所写的语句没经过调试,你可以参阅MSDN关于ADO的讲解,上面的"AdLoceOptimistic"拼写错误.应该写成rst.open strSql,con,adOpenDynamic,adOpenOptimistic最好到网上查找关于ADO编成的资料,因为Open方法的"游标类型"和"锁类型"还有很多细节需要掌握.