Het weergeven van Excel-werkbladgegevens naar een Datagrid-besturingselement van Visual Basic 6

Weergeven van Excel-gegevens naar een Visual Basic 6.0 DataGrid-besturingselement kunt maken uw toepassingen VB6 linegebruik aangenamer door wordt kundig voor weergave van gegevens uit Excel. VB6 is een programmeertaal die is ontwikkeld door Microsoft. VB6 is vervangen door Visual Basic.NET (VB.NET), waarmee het .NET framework. Een DataGrid-besturingselement wordt gebruikt voor het weergeven van gegevens in tabelvorm vergelijkbaar met een databasetabel. Het gebruik van ADO naar de verbinding voor Excel en query het werkblad met een "Select" SQL-instructie maken. Zodra u een verbinding naar Excel maakt kunt u een Recordset voor toegang tot de gegevens.

• Kopieer en plak de volgende code om een nieuwe sub-procedure en de variabelen die u gebruiken zal om de verbinding naar Excel maken:

  Private Sub displayExcelInDataGrid()

  Dim rs As ADODB.RecordsetSet rs = New ADODB.RecordsetDim sconn As StringDim sFile As String

• Het pad naar het Excel-werkblad gedefinieerd en de recordset-eigenschappen definiëren:

  sFile = "C:\Temp\myXLFile.xls"rs.CursorLocation = adUseClientrs.CursorType = adOpenKeysetrs.LockType = adLockBatchOptimistic

• Kopieer en plak de volgende code query "Blad1" vanuit Excel en door middel van het DataGrid-besturingselement weergeven met behulp van de recordset:

  sconn = "DRIVER=Microsoft Excel Driver (*.xls);" & "DBQ=" & sFilers.Open "SELECT * FROM [sheet1$]", sconnSet DataGrid1.DataSource = rs

  End Sub