虽然在VB.NET中可以使用com组件中的DataGrid控件来显示ADO中的RecordSet对象的记录,但是com组件中的DataGrid控件的功能远没有.NET Framework组件中的DataGrid控件强大,其实也可以用.NET Framework组件中的DataGrid控件显示ADO中的RecordSet对象的记录,在VB.NET论坛看到大多数人只用过.NET Framework组件中的DataGrid控件来显示ADO.NET中的DatsSet对象的记录. 那么,对于使用.NET Framework组件中的DataGrid显示ADO中的RecordSet对象的记录是怎样呢?
Imports ADODB Imports System.Data Imports System.Data.OleDb
Private Sub frmMain_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim rs_YPDZT As New ADODB.Recordset Dim sql As String sql = "select * from YPFLG_DZT " rs_YPDZT.CursorLocation = CursorLocationEnum.adUseClient rs_YPDZT.Open(sql, conn, CursorTypeEnum.adOpenKeyset, LockTypeEnum.adLockPessimistic)
Dim ds_YPDZT As New Data.DataSet Dim da_YPDZT As OleDbDataAdapter da_YPDZT = New OleDbDataAdapter(sql, gLinkString) da_YPDZT.Fill(ds_YPDZT, rs_YPDZT, "YPB") StatusBar1.Panels.Item(0).Text = username DataGrid1.DataSource = ds_YPDZT.Tables("YPB") End Sub
.NET Framework组件中的DataGrid显示ADO中的RecordSet对象的记录,必须将RecordSet匹配给DataSet,如上语句:da_YPDZT.Fill(ds_YPDZT, rs_YPDZT, "YPB")!


|