Τρόπος υποβολής ερωτημάτων Από υπολογιστικό φύλλο του Excel χρησιμοποιώντας το Visual Basic

υπολογιστικά φύλλα του Excel σας παρέχει τις πληροφορίες που χρησιμοποιούνται σε Visual Basic ( VB ) εφαρμογές . VB έντυπα περιέχουν εσωτερικές συνδέσεις Excel για την αναζήτηση των δεδομένων . Οι πληροφορίες που ερώτημα στη συνέχεια χρησιμοποιείται για την εμφάνιση , τον υπολογισμό ή να χειριστείτε τα δεδομένα . Μπορείτε να συνδεθείτε σε ένα υπολογιστικό φύλλο του Excel από το VB χρησιμοποιώντας παρόμοιες τεχνικές που χρησιμοποιούνται για την αναζήτηση μιας βάσης δεδομένων Access ή SQL Server. Η γλώσσα VB παρέχει έναν απλό τρόπο για να χρησιμοποιούν λογιστικά φύλλα του Excel σε οποιαδήποτε επιφάνεια εργασίας ή την εφαρμογή Web . Οδηγίες
Η 1

Δημιουργήστε τη συμβολοσειρά σύνδεσης που οδηγεί στο αρχείο υπολογιστικού φύλλου Excel . Η σειρά στην πραγματικότητα δεν συνδεθεί μέχρι η σύνδεση λέγεται , αλλά θέτει την εντολή που χρησιμοποιείται για τη σύνδεση VB στο Excel . Ο παρακάτω κώδικας δημιουργεί συμβολοσειρά σύνδεσης :

Dim conn Όπως String = " Provider = Microsoft.Jet.OLEDB.4.0 ? Προέλευσης δεδομένων = C : \\ theExcelFile.xls ? Επέκταση Properties = " " Excel 8.0 ? " " "

Αντικαταστήστε το " C : \\ theExcelFile.xls " με το όνομα του αρχείο Excel φύλλο σας 2

Connect και το ερώτημα το υπολογιστικό φύλλο του Excel . . Η " OLE Adapter" συνδέει τα διάφορα αρχεία στο σκληρό σας δίσκο από τη Visual Basic . Το OLE Adapter χειρίζεται τη μετάφραση μεταξύ του κώδικα VB και το διαμορφωμένο αρχείο Excel . Οι ακόλουθες επιλέγει όλες τις εγγραφές από το πρώτο φύλλο :

Dim δεδομένα As New OledbDataAdapter ( " select * from [ Φύλλο1 $ ] " , conn )

Ανακοίνωση προστίθεται το « conn " μεταβλητή συμβολοσειράς σύνδεσης στον προσαρμογέα .
εικόνων 3

Συμπληρώστε το σύνολο δεδομένων σας , ώστε να μπορείτε να χρησιμοποιήσετε τις τιμές που επιστρέφονται σε άλλες περιοχές του κώδικα VB σας . Ένα σύνολο δεδομένων είναι μια βασική μονάδα που χρησιμοποιείται για να περιέχει όλα τα αρχεία που προέρχονται από οποιαδήποτε πηγή δεδομένων, όπως Excel , Access ή SQL Server. Χρησιμοποίησε τον παρακάτω κώδικα για να «γεμίζουν» τα δεδομένα που με τις τιμές που επιστρέφονται Excel :

Dim δέσμη As New DataSet ( ) data.TableMappings.Add ( " Πίνακας " , " Excel " ) data.Fill ( δέσμη )
Η 4

Προβολή περιεχομένου του αρχείου Excel στο χρήστη . Ο ευκολότερος τρόπος για να εμφανίσετε τα δεδομένα ανακτώνται από μια βάση δεδομένων ή αρχείο χρησιμοποιώντας μια " GridView " αντικείμενο . Ο ακόλουθος κώδικας εμφανίζει τα αποτελέσματα από το Excel σε μορφή VB : .

TheGrid.DataSource = dataset.Tables ( 0 ) DefaultViewtheGrid.DataBind ( )
Η
εικόνων