efan2000 发表于 2003-4-25 20:44:00

在代码中提定

看了一下,DataGrid在属性页中没有这个属性,但在代码中可以使用DataSource的属性。
With Adodc1
    .ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & sAppPath & "\gys_tj.mdb"
    .CommandType = adCmdTable
    .CursorType = adOpenKeyset
    .LockType = adLockBatchOptimistic
    .RecordSource = "tj"
    .Refresh
    If .RecordSet.RecordCount > 0 Then .RecordSet.MoveFirst
End With
With DataGrid1
    Set .DataSource = Adodc1
    .Refresh
    .Caption = ""
    .Columns(0).Width = 50
    .Columns(0).Caption = "定额编号"
    .Columns(1).Width = 200
    .Columns(1).Caption = "项目名称"
    .Columns(2).Width = 50
    .Columns(2).Caption = "单位"
    .Columns(3).Width = 50
    .Columns(3).Caption = "数量"
End With
这是很久以前的程序的一部分代码,关于DataGrid与ADODC的控件使用。

飞火 发表于 2003-4-28 18:50:00

高手就是高手,谢谢了!!!

高手就是高手,谢谢了!!!

飞火 发表于 2003-4-28 20:11:00

谢谢 您的帮助!我的问题终于解决了。。

本人是新手,以后还希望高手多多指教啊。。
页: 1 [2]
查看完整版本: 求高手指教,在用VBA开发Autocad的问题