Ξεκινήστε το Microsoft Visual Basic Express και επιλέξτε "New Project ... " από το μενού "Αρχείο" . Επιλέξτε " Windows Forms Application " και κάντε κλικ στο "OK". 2
Πατήστε το " Ctrl + Alt + X " για να ανοίξετε το μενού "Εργαλεία" . Κάντε διπλό κλικ στο " κουμπί" και " DataGridView " για να προσθέσετε αυτά τα κουμπιά για " Φόρμα1 . " Κάντε διπλό κλικ στο " Button1 " για να ανοίξει το μάθημα « Form1.vb " .
Εικόνων 3
Πληκτρολογήστε " Εισαγωγές System.Data.OleDb " ( χωρίς εισαγωγικά) στην πρώτη γραμμή της " . Form1.vb "
Η 4
Πληκτρολογήστε τα ακόλουθα για να δηλώσετε τις μεταβλητές σας μέσα " Button1_Click " :
Dim connString Όπως OleDbConnection
Dim sqlComm Όπως OleDbCommand
Dim strSQL Όπως String
Dim ds Όπως DataSet
5
Πληκτρολογήστε το παρακάτω για να κάνετε τη σύνδεση με το " Northwind " βάση δεδομένων και να διερευνούν όλα τα δεδομένα στο " Παραγγελίες " πίνακα:
strSQL = " . SELECT * ΠΑΡΑΓΓΕΛΙΕΣ ΑΠΟ ΠΑΡΑΓΓΕΛΙΕΣ ? "
connString = Νέα OleDbConnection _
( " Provider = Microsoft.ACE.OLEDB.12.0 ? Πηγή Δεδομένων = C : \\ Northwind 2007.accdb ? " )
Επεξεργασία " C : \\ Northwind 2007.accdb " και να πληκτρολογήσετε τη διαδρομή της βάσης δεδομένων σας
Η 6
Πληκτρολογήστε το παρακάτω για να δημιουργήσετε και να ορίσετε . μεταβλητές :
Dim MyConnection Όπως OleDbConnection = Νέα OleDbConnection
Dim da Όπως OleDbDataAdapter
da = Νέα OleDbDataAdapter ( strSQL , connString )
ds = New DataSet
Η 7
Πληκτρολογήστε το παρακάτω, για να γεμίσει τον έλεγχο Πλέγμα δεδομένων με δεδομένα που επιστρέφονται από το ερώτημα :
da.Fill (ds , " tmpTable " )
With Me . DataGridView1
. DataSource = ds.Tables ( " tmpTable " )
myConnection.Close ( )
End With
Έχετε διαβάσει όλα τα αρχεία από τον πίνακα "Παραγγελίες" και φορτώνονται τα δεδομένα στο Data Grid ελέγχου .
Πατήστε το πλήκτρο " F5 " για να τρέξετε το πρόγραμμά σας , στη συνέχεια, κάντε κλικ στο κουμπί " Button1 ".
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα