Ανοικτής Πρόσβασης , στη συνέχεια, πατήστε το πλήκτρο "Control - N " για να δημιουργήσετε μια νέα βάση δεδομένων . Πιέστε το πλήκτρο " Control- S" για να εμφανιστεί το παράθυρο διαλόγου " Αποθήκευση δεδομένων " . Πληκτρολογήστε "c : \\ games.accdb " για το όνομα του αρχείου και στη συνέχεια κάντε κλικ στο κουμπί " Αποθήκευση" για να αποθηκεύσετε τη βάση δεδομένων . Αυτό το βήμα δημιουργεί ένα δείγμα βάσης δεδομένων που θα χρησιμοποιήσετε για τα δεδομένα VB . 2
Κάντε κλικ στο εικονίδιο "Δημιουργία " καρτέλας " Πίνακας " , στη συνέχεια, κάντε διπλό κλικ στο top-πλέον κελί του πλέγματος που εμφανίζεται. Πληκτρολογήστε " gamename " στο κελί .
Εικόνων 3
Πατήστε " Control- S" για να εμφανιστεί η προτροπή να αποθηκεύσετε τον πίνακα , στη συνέχεια, πληκτρολογήστε " Παιχνίδια " για το όνομα του πίνακα .
4
Exit πρόσβαση και ανοικτή VB . Πιέστε το πλήκτρο " Control- N , " και στη συνέχεια κάνοντας κλικ στο " τα Windows μορφή του έργου . " Η δράση αυτή θα δημιουργήσει ένα πρόγραμμα που εμφανίζει μια φόρμα εισόδου /εξόδου χρήστης μπορείτε να προσαρμόσετε .
5
Κάντε κλικ στο εικονίδιο της κύριας γραμμής εργαλείων «κουτί εργαλείων » για να εμφανιστεί η παλέτα περιέχει στοιχεία ελέγχου που μπορείτε να σύρετε πάνω στην προεπιλεγμένη φόρμα .
Η 6
Σύρετε ένα στοιχείο ελέγχου κουμπιού από την παλέτα πάνω στο έντυπο . Κάντε δεξί κλικ στο κουμπί και επιλέξτε "Ιδιότητες ", στη συνέχεια, πληκτρολογήστε τα παρακάτω στο "Text " σειρά "Ιδιότητες " παράθυρο : " InsertToDatabase " . Το κουμπί θα εμφανίσει το κείμενο που έχετε πληκτρολογήσει .
Η
7 Κάντε διπλό κλικ στο κουμπί για να εισάγετε την κωδικοποίηση περιβάλλον . Πληκτρολογήστε την ακόλουθη δήλωση πάνω από την ένδειξη " End Sub" . Η δήλωση αυτή θα καλέσει κάποια άλλη λειτουργία που θα εκτελέσει την εισαγωγή της βάσης δεδομένων .
InsertDB ( )
8
Επικολλήστε τον ακόλουθο υπορουτίνα μετά τη δήλωση « End sub" . Αυτή η υπορουτίνα ανοίγει μια σύνδεση με τη βάση δεδομένων που κάνατε στο παρελθόν , στη συνέχεια, εκτελεί μια πρόταση SQL ένθετο στην εν λόγω σύνδεση βάσης δεδομένων .
Private Sub insertDb ( )
Dim strCmd Όπως OleDbCommand
Dim strSQL Όπως String Dim
DbCmd Όπως New OleDbCommand
Δημ. cnxn = Νέα OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 ? προέλευσης δεδομένων = C : \\ \\ Games.accdb ? Persist Πληροφορίες Ασφαλείας = False ? " )
strSQL = " INSERT INTO Παιχνίδια ( [ gamename ] ) τιμές ( 'Bar Wars " ) ? "
strCmd = Νέα OleDbCommand ( strSQL , cnxn )
cnxn.Open ( )
DbCmd = Νέα OleDbCommand ( strSQL , cnxn )
DbCmd.ExecuteNonQuery ( )
cnxn.Close ( )
End Sub
Η
9 Κάντε κλικ στο κουμπί " Προσθήκη νέας πηγής δεδομένων " στοιχείο του μενού "Δεδομένα" , τότε κάντε κλικ στο σύνδεσμο «Αναφορά» στο νέο παράθυρο που εμφανίζεται . VB αυτό απαιτείται και το επόμενο βήμα για να εντοπίσετε τον εξωτερικό κώδικα του προγράμματος που εκτελεί λειτουργίες της βάσης δεδομένων .
Η 10
Κάντε κλικ στο νέο παράθυρο το κουμπί "Προσθήκη" , στη συνέχεια, κάντε κλικ στα στοιχεία " System.Data " και "System . DataSetExtensions "
11
Πατήστε το πλήκτρο" F5 "για να εκτελέσετε το πρόγραμμα , στη συνέχεια, πατήστε το κουμπί" InsertToDatabase " κουμπί
Η 12
Open, στην Access , το . " C: \\ Παιχνίδια . accdb "το αρχείο της βάσης δεδομένων που έχετε αποθηκεύσει .
Η 13
κάντε διπλό κλικ το παράθυρο πλοήγησης " παιχνίδι " στοιχείο για να εμφανίσετε τον πίνακα Αγώνων. Το κύριο παράθυρο της Access θα εμφανίσει τη γραμμή δεδομένων "Bar Wars ", το οποίο ο κώδικας VB εισαχθεί .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα