非常简单的问题
如何用程序连接datragrid

解决方案 »

  1.   

    如果你说的是连接datagrid 而不是datragrid的话:
    直接设定datagrid的datasource为一个打开的记录集就可以了。
      

  2.   

    给个例子:
     With Rs
                .CursorLocation = adUseClient
                .CursorType = adOpenForwardOnly
                .LockType = adLockReadOnly
                .Open cmd
               If Not .EOF Then
                        DataGrid2.Visible = False
                        DataGrid2.Columns(0).DataField = .Fields("Material_Code").Name
                        DataGrid2.Columns(1).DataField = .Fields("Material_Name").Name
                        Set DataGrid2.DataSource = Rs
                        DataGrid2.Columns(0).Caption = "物料代码"
                        DataGrid2.Columns(1).Caption = "物料名称"
                        DataGrid2.Visible = True
                        DataGrid2.Refresh
              Else
                      Set DataGrid2.DataSource = Rs
                      DataGrid2.Visible = False
                       
              End If
           End With