DataGrid控件如何使用？

Question

怎样使DataGrid通过adodc与数据库连接起来？直接写程序，不用其它控件。下面的代码如何修改
 Dim rs As ADODB.Recordset
 Dim sqlstr, password As String
 sqlstr = "select * from users"
 Set rs = ExecuteSQL(sqlstr)
 DataGrid1.DataSource = rs另：
  DataGrid的标头用的是数据库中表的字段名，能不能程序中付新值？

Answer 1

当然可以了
你试试吧，好用的
记得要引用adoDim WithEvents adoPrimaryRS As Recordset '数据库连接对象
Private Sub Command1_Click()
   'strsql 是你的查询语句 你可以order by 排序的字段
   'strsql="select xh as 学号 from 表" 这里的学号就是你数据表中字段的标题
   strsql="select 字段 from 表"
   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

Dim rs As ADODB.Recordset
 Dim sqlstr, password As String
 sqlstr = "select * from users"
 Set rs = ExecuteSQL(sqlstr)
 DataGrid1.DataSource = rs这个不就是直接用代码连的么？没用其他控件嘛 
DataGrid的标头 你试一下SQl语句中使用别名 看能不能更改

Answer 3

Dim rs As ADODB.Recordset
 Dim sqlstr, password As String
 sqlstr = "select * from users"
 Set rs = ExecuteSQL(sqlstr)
 DataGrid1.DataSource = rs这些代码是错误的。怎样修改？

Answer 4

 DataGrid1.DataSource = rs
改为：
Set  DataGrid1.DataSource = rs

Answer 5

如果你是用Adodc控件跟DataGrid绑定，可以这样做：
Private Sub Command1_Click()   
    Adodc1.RecordSource = "select * from users"
    Adodc1.Refresh
    set DataGrid1.DataSource=Adodc1'绑定DataGrid1到Adodc1，显示数据
End Sub