Affichage des données Excel à une base DataGrid contrôle Visual Basic 6.0 peut faire de vos applications VB6 plus conviviaux en étant capable d' afficher des données à partir d'Excel . VB6 est un langage de programmation informatique développé par Microsoft. VB6 a été remplacé par Visual Basic.NET ( VB.NET ) qui utilise le framework. NET . Un contrôle DataGrid est utilisé pour afficher des données dans un format tabulaire similaire à une table de base de données. Utilisez ADO pour établir la connexion à Excel et interroger la feuille de calcul en utilisant un "Select" instruction SQL. Une fois que vous établissez la connexion à Excel , vous pouvez utiliser un jeu d'enregistrements pour accéder aux données . Instructions
1
copiez et collez le code suivant pour créer un nouveau sous-procédure et de créer les variables que vous allez utiliser pour faire le lien vers Excel :
Private Sub displayExcelInDataGrid () Dim rs comme ADODB.RecordsetSet rs = New ADODB.RecordsetDim sConn comme StringDim sFile As String
2
Définissez le chemin de votre feuille de calcul Excel et définir les propriétés d'enregistrements :
sFile = "C : \\ Temp \\ myXLFile.xls " rs.CursorLocation = adUseClientrs.CursorType = adOpenKeysetrs.LockType = adLockBatchOptimistic
3
Copiez et collez le code suivant requête " Sheet1 " à partir d'Excel et affichage à travers le contrôle DataGrid en utilisant le jeu d'enregistrements :
sConn = " DRIVER = Microsoft Excel Driver ( *. xls) ; " & " DBQ =" & sFilers.Open "SELECT * FROM [ ,"Sheet1 $ ] » sconnSet DataGrid1.DataSource = rsEnd Sous