Πώς να Bind ένα DataSet σε ένα DataGridView

Η DataGridView είναι ένα στοιχείο ελέγχου ActiveX που χρησιμοποιείται συχνά σε Visual Basic εφαρμογές που βασίζονται στη δέσμευση και την εισαγωγή δεδομένων από μια εξωτερική βάση δεδομένων και , στη συνέχεια, παρουσιάζουν τα δεδομένα σε ένα υπολογιστικό φύλλο - όπως μορφή . Πριν συνδέσετε τον έλεγχο DataGridView μέσω κώδικα προγραμματισμού , απαιτείται να τοποθετήσετε το στοιχείο ελέγχου επάνω Φόρμα VB σας πρώτα . Δεσμευτική τον έλεγχο DataGridView απαιτεί κάποια γνώση της VB προγραμματισμού . Από τη στιγμή που έχει αποκτηθεί , να πάρει το κάνει παίρνει μόνο μερικά απλά βήματα και γραμμές κώδικα . Οδηγίες
Η 1

Ανοίξτε Visual Basic 6 . 2

Επιλέξτε "Standard EXE " από τη νέα λίστα των έργων . Είστε τώρα στο Basic 6 περιβάλλον προγραμματισμού Visual . Πρέπει να έχετε μια προεπιλεγμένη κύρια μορφή στην οθόνη σας για να ξεκινήσετε την προσθήκη στοιχείων ελέγχου σας.
Εικόνων 3

Κάντε κλικ στο " Έργο ", ακολουθούμενο από " στοιχεία".
Η 4

Scroll κάτω στη λίστα των συστατικών και να αναζητήσει " Microsoft DataGridView ελέγχου . " Τοποθετήστε έναν έλεγχο στο πλαίσιο δίπλα του και κάντε κλικ στο "OK". Αυτό θα θέσει την DataGridView ελέγχου επάνω έλεγχο εργαλειοθήκη σας .
5

Επιλέξτε τον έλεγχο DataGridView από την εργαλειοθήκη . Σύρετε το και αφήστε το στην κύρια φόρμα σας να αρχίσετε να χρησιμοποιείτε αυτό .
Η 6

Πηγαίνετε στο μενού στην κορυφή και κάντε κλικ στο "Project ", ακολουθούμενο από το " Προσθήκη Module . " Πληκτρολογήστε ή αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στη λειτουργική μονάδα :

Private Sub GetData ( ByVal selectCommand Όπως String )

Δοκιμάστε

« Καθορίστε μια συμβολοσειρά σύνδεσης . Αντικαταστήστε τη δεδομένη τιμή με

« έγκυρη συμβολοσειρά σύνδεσης για ένα δείγμα Northwind SQL Server

« βάση δεδομένων προσβάσιμη για το σύστημά σας .

Δημ. ConnectionString As String = _

« Ολοκληρωμένη Ασφάλεια = SSPI ? Εξακολουθούν Πληροφορίες Ασφαλείας = False ? " + _

" Initial Catalog = Northwind ? προέλευσης δεδομένων = localhost "

« Δημιουργήστε ένα νέο προσαρμογέα δεδομένων με βάση το καθορισμένο ερώτημα .

Me.dataAdapter = Νέα SqlDataAdapter ( selectCommand , ConnectionString )

« Δημιουργήστε έναν οικοδόμο εντολή για να δημιουργήσετε SQL ενημέρωση , ένθετο , και

'διαγραφή εντολές με βάση selectCommand . Αυτά χρησιμοποιούνται για να

« ενημέρωση της βάσης δεδομένων .

Δημ. CommandBuilder Όπως New SqlCommandBuilder ( Me.dataAdapter )

« Συμπλήρωση έναν νέο πίνακα δεδομένων και να το συνδέσει με το BindingSource .

Dim πίνακα ως νέα DataTable ( )

table.Locale = = Τραπέζι

' Αλλαγή μεγέθους των στηλών DataGridView για να χωρέσει το νέο φορτωμένο περιεχόμενο .

Me.dataGridView1.AutoResizeColumns ( _

DataGridViewAutoSizeColumnsMode.AllCellsExceptHeader )

αλιευμάτων Ως εκ SQLException

MessageBox.Show ( " Για να εκτελέσετε αυτό το παράδειγμα , να αντικαταστήσει την αξία του " + _

" ConnectionString μεταβλητή με μια συμβολοσειρά σύνδεσης που είναι " + _

"ισχύει για το σύστημά σας . " )

End Δοκιμάστε

Sub End
Η
εικόνων