Public Function Adodc(conString As String, adodc_name As Adodc, grid As DataGrid)
Dim cnStr As String
cnStr = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=Wage;Data Source=(local)"
With adodc_name
.ConnectionString = cnStr
.CommandType = adCmdText
.RecordSource = conString
Set grid.DataSource = adodc_name
.Refresh
End With
End Function
这段代码我看了很多书都不是很理解，希望高手能够详细的讲解下，最好有资料。先谢了。。。。
在线等

这是一个利用ADODC设置DataGrid的函数
cnStr是设置连接的字串，用来连接SQL数据库
adodc_name是一个ADODC对象
通过把它的ConnectionString属性设置成cnStr，使Adodc_name连接到数据库
CommandType是用来说明RecordSource的类型的
它在ADODC中可以取以下值：
属性 值 说明
adCmdText 1 按命令或存储过程调用的文本定义计算 CommandText。
adCmdTable 2 按表名计算 CommandText，该表的列全部是由内部生成的 SQL 查询返回的。
adCmdStoredProc 4 按存储过程名计算 CommandText。
adCmdUnknown 8 默认值。指示 CommandText 属性中命令的类型未知。
当你要用Sql的命令操作数据时，使用adCmdText
如果你要直接打开一个数据表，用adCmdTable,这时，你在Recordset中直接用数据表的名称即可
其他类似，见上面说明
后面的两句，是把dataGrid的数据源设置为Adodc_name
也就是说，你要用Adodc_name来填充datagrid