数据库问题请教

Question

问题1：出错提示“未找到方法或数据”。出错行DataGrid1.DataSource = ret
       Dim local_db As String
      Dim cnn As Connection
      Dim ret As Recordset
      Set cnn = New ADODB.Connection
      Set ret = New ADODB.Recordset
      cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path & "\data\车辆管理(含图片).mdb" + ";Persist Security Info=False;"
      local_db = "select * from 信息表"
      ret.Open local_db, cnn
      DataGrid1.DataSource = ret
问题2：我在ACCESS数据库中建了一个查询1，VB如何调用并把结果显示出来？
问题3： DataGrid1显示表中能设置按钮吗？点按钮就显示该行数据段对应的其他信息。比如数据表第一行有车牌号字段，点击按钮显示车牌号对应的车辆其他基本信息（基本信息显示在另一窗口）

Answer 1

问题1： 
      Dim local_db As String 
      Dim cnn As Connection 
      Dim ret As Recordset 
      Set cnn = New ADODB.Connection 
      Set ret = New ADODB.Recordset 
      cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path & "\data\车辆管理(含图片).mdb" + ";Persist Security Info=False;" 
      local_db = "select * from 信息表" 
      ret.Open local_db, cnn 
      set DataGrid1.DataSource = ret 问题2：
      select * from 查询1 

Answer 2

local_db = "select * from 信息表" 
if ret.state<>adstateclosed then ret.close
ret.Open local_db, cnn,adopenkeyset,adlockreadonly
set datagrid1.datasource=ret
ret.close
 

Answer 3

问题1：可能是ret为空引用,即表中没有记录.
 
问题2：作为一个普通表执行查询就行.问题3：可以的
        

Answer 4

去下载区看一下“VB ADO数据库开发基本功能大全吧”。没有用DATAGRID，用的msflexgrid，一样的。

Answer 5

datagrid1.banding
要加了数据绑定才能显示

Answer 6

这个在Datagrid属性页>布局>选一列然后在按钮前打勾勾或是用代码如:Me.DataGrid1.Columns(1).Button = True也可以点按钮就显示该行数据段对应的其他信息。这个功能你在DataGrid的ButtonClick事件中添加实现代码就可以了.还有DataGrid一般和Adodc绑定使用,这样你上面的连接代码和查询语句可以不需要了,效率也可以

Answer 7

十分感谢。我按照你说的做了，但查询结果却显示不出来了。为什么？
另外加按钮数据段显示形式就像ComboBox控件，我要这列都显示查看，点击查看就显示对应的其他信息，关键代码怎么写？谢谢

Answer 8

这样可以得到当前Cell的值Private Sub DataGrid1_ButtonClick(ByVal ColIndex As Integer)
    Debug.Print DataGrid1.Text
End Sub

Answer 9

其实有 Datagrid，就不需要按钮和列表框之类的东东。Private Sub DataGrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer)
'现在记录已经定位到用户点击的记录
'把 ret 中各个字段的值写到另外一个窗口控件中即可
'......
End Sub

Answer 10

感谢帮助。当你误解了我的意思。我想显示Datagrid没有显示的信息。你的方法只是把已显示的信息具体化而已。不知道说的对不对。我是新手。
另外，加按钮后查询结果显示不出来，不加能显示，为什么？