Πώς να χρησιμοποιήσετε χαρακτήρων μπαλαντέρ Με το Excel Visual Basic

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

την εφαρμογή Microsoft Visual Basic Express , κάντε κλικ στο " New Project" στο αριστερό τμήμα της οθόνης του υπολογιστή σας και κάντε διπλό κλικ στο " Microsoft Windows Forms " για να δημιουργήσετε ένα νέο έργο .

2

διπλό κλικ στο " DataGridView " για να προσθέσετε ένα νέο στοιχείο ελέγχου στη φόρμα . Κάντε διπλό κλικ στο " κουμπί" για να προσθέσετε ένα νέο κουμπί στη φόρμα .
Εικόνων 3

διπλό κλικ στο " Button1 " για να δημιουργήσετε ένα συμβάν κλικ το κουμπί . Προσθέστε τον ακόλουθο κώδικα για να δημιουργήσετε τη σύνδεση με το αρχείο Excel :

Dim connString As String = " Provider = Microsoft.ACE.OLEDB.12.0 ? Προέλευσης δεδομένων = C : \\ ExcelFile.xlsx ? Επέκταση Properties = Excel 12.0 ? "
Η 4

Επεξεργασία " C : \\. ExcelFile.xlsx "στο προηγούμενο βήμα και πληκτρολογήστε τη διαδρομή και το όνομα του αρχείου Excel
5

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

Dim MyConnection Όπως OleDbConnection = Νέα OleDbConnection

Dim ds Όπως DataSet

Dim da Όπως OleDbDataAdapter

Dim strSQL Όπως String
Η 6

Χρησιμοποιήστε το " * " άγριο χαρακτήρα στην ακόλουθη δήλωση SQL για να διαβάσετε όλα τα δεδομένα στο " Φύλλο1 " του υπολογιστικού φύλλου :

strSQL = "SELECT * FROM [ ,"Ópo̱s String
I̱ 6

Chri̱simopoií̱ste to " * " ágrio charaktí̱ra sti̱n akólouthi̱ dí̱lo̱si̱ SQL gia na diavásete óla ta dedoména sto " Fýllo1 " tou ypologistikoú fýllou :̱

strSQL = "SELECT * FROM [ Φύλλο1 $ ] "
Η 7

Διαβάστε το αρχείο με DataAdapter και να γεμίσει ένα DataSet με τα δεδομένα :

myConnection.ConnectionString = connString

da = Νέα OleDbDataAdapter ( strSQL , MyConnection )

ds = New DataSet

da.Fill (ds , « πίνακας»)
8

Κλείσιμο της σύνδεσης και να εμφανίσει τα δεδομένα στο DataSet μέσω του ελέγχου DataGridView :

myConnection.Close ( )

DataGridView1.DataSource = ds.Tables ( « πίνακας»)
Η

9 Πατήστε το πλήκτρο " F5 " για να εκτελέσετε το πρόγραμμα και κάντε κλικ στο " Button1 " για να διαβάσετε το αρχείο Excel .
Η
εικόνων