一个关于DataGrid的问题

Question

我在窗体上放了一个Adodc控件 一个combobox 和一个DataGrid 一个Command
我想当在combobox中选择好内容后 然后按下command   DataGrid 中会显示我要查找的内容
怎样编写代码啊

Answer 1

最好不要用adodc,还是用ado把
记得要在工程中引用ado
Dim Db As Connection
Dim WithEvents adoPrimaryRS As Recordset '数据库连接对象
Private Sub Command1_Click()
   'strsql 是你的查询语句 
   strsql="select 字段 from 表 where 字段='" & combobox.text & "'"
   Set Db = New Connection
   Db.CursorLocation = adUseClient
   '下面的连接数据字符串你要修改一下
   Db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\计划管理系统.mdb;Persist Security Info=False"
   Set adoPrimaryRS = New Recordset
   adoPrimaryRS.Open strsql, Db, adOpenStatic, adLockOptimistic
   Set DataGrid1.DataSource = adoPrimaryRS
end sub

Answer 2

我用过DAO ADODC 。ADO我还真不会用 看了半天书 没找到例子

Answer 3

楼主呀，其实人家说得很对的。别用adodc,还是用ado吧。网上例子很多的。
用adodc控件是很不方便的。十人有九人会这样告诉你的。

Answer 4

你只需要在工程/引用 miscrosoft Activex data objects 2.x library 就可以了然后将我上面的代码放到窗体中就可以用