关于DATAGRID控件的问题

Question

界面:  姓名:文本框  卡号:文本框    确定
       DATAGRID1数据表:自动编号  卡号  姓名  日期  金额  备注希望得到的效果是:输入姓名,点击确定,显示卡号(这个是根据其他表实现),然后查找数据表中与文本框中卡号相符的记录,显示在DATAGRID1上.显示顺序为:备注,日期,金额.请问各位大侠有无解决办法.谢谢

Answer 1

是呀 不是很简单的吗？？
根据姓名查询呀？
然后把结果集 给DATAGRID不就行了？

Answer 2

我是按卡号查询的.
但DATAGRID就是不能显示结果

Answer 3

Set rs = New ADODB.Recordsetrs.Open "select 备注,金额,日期 from 收入表 where 卡号='" & Trim(Text2.Text) & "'", cn, adOpenKeyset, adLockReadOnly
Set Grid1.DataSource = rs请问然后怎么处理呢??

Answer 4

你查询的时候 
改成：
rs.Open "select 备注,日期,金额 from 收入表 where 卡号='" & Trim(Text2.Text) & "'", cn, adOpenKeyset, adLockReadOnly这样查~

Answer 5

datagrid动态显示数据的方法
你试试吧，好用的
记得要引用ado  
你只需要在工程/引用 miscrosoft Activex data objects 2.x library 就可以了
Dim Db As Connection
Dim WithEvents adoPrimaryRS As Recordset '数据库连接对象
Private Sub Command1_Click()
      strsql="select 字段 from 表 where 你的条件"
   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