Τρόπος εμφάνισης Excel Φύλλο δεδομένων σε Visual Basic 6 Datagrid Ελέγχου

Εμφάνιση δεδομένων του Excel σε βασικό έλεγχο Visual Basic 6.0 DataGrid μπορεί να κάνει εφαρμογές VB6 σας πιο φιλικό προς το χρήστη με το να είναι σε θέση να εμφανίσει δεδομένα από το Excel . VB6 είναι μια γλώσσα προγραμματισμού που αναπτύχθηκε από τη Microsoft . VB6 έχει αντικατασταθεί από τη Visual Basic.NET ( VB.NET ), η οποία χρησιμοποίησε το NET framework . . Ένα στοιχείο ελέγχου DataGrid χρησιμοποιείται για την εμφάνιση των δεδομένων σε μορφή πίνακα παρόμοιο με έναν πίνακα βάσης δεδομένων . Χρησιμοποιήστε το ADO για να κάνουν τη σύνδεση με το Excel και της διερεύνησης του φύλλου με ένα "Επιλογή" δήλωση SQL . Μόλις κάνετε τη σύνδεση με το Excel , τότε μπορείτε να χρησιμοποιήσετε ένα Recordset για να έχουν πρόσβαση στα δεδομένα . Οδηγίες
Η 1

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα για να δημιουργήσετε μια νέα διαδικασία ρουτίνας και να δημιουργήσει τις μεταβλητές που θα χρησιμοποιήσετε για να κάνετε τη σύνδεση με το Excel :

Private Sub displayExcelInDataGrid ( ) Dim rs Όπως ADODB.RecordsetSet rs = Νέα ADODB.RecordsetDim sconn Όπως StringDim sFile Όπως String 2

Ορίστε τη διαδρομή στο φύλλο εργασίας του Excel και να καθορίσει τις ιδιότητες εγγραφών :

sFile = " C : \\ Temp \\ myXLFile.xls " rs.CursorLocation = adUseClientrs.CursorType = adOpenKeysetrs.LockType = adLockBatchOptimistic
εικόνων 3

Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα ερώτημα " Φύλλο1 " από το Excel και να το εμφανίσετε μέσω ο έλεγχος DataGrid , χρησιμοποιώντας το σύνολο εγγραφών :

sconn = " DRIVER = Microsoft Excel Driver ( *. xls) ? " & " DBQ = " & sFilers.Open "SELECT * FROM [ ,"o élenchos DataGrid , chri̱simopoió̱ntas to sýnolo engrafó̱n :̱

sconn = " DRIVER = Microsoft Excel Driver ( *. xls) ?̱ " & " DBQ = " & sFilers.Open "SELECT * FROM [ sheet1 $ ] " , sconnSet DataGrid1.DataSource = rsEnd Sub
Η
εικόνων