Ξεκινήστε τη Microsoft Access και επιλέξτε " Κενή βάση δεδομένων . " Ονομάστε τη βάση δεδομένων "Test" και κάντε κλικ στο κουμπί " Δημιουργία ". 2
Ξεκινήστε το Microsoft Visual Basic 2010 Express , επιλέξτε από το μενού "Αρχείο" και επιλέξτε "New Project ". Κάντε κλικ στο " Windows Forms Application " και επιλέξτε "OK". Επιλέξτε " Εργαλεία " στο αριστερό τμήμα του παραθύρου και κάντε διπλό κλικ στο " κουμπί" για να προσθέσετε ένα νέο κουμπί στο " Φόρμα1 ".
Εικόνων 3
διπλό κλικ στο " Button1 " για να ανοίξετε το " Form1 . vb " ενότητα . Πληκτρολογήστε τα ακόλουθα στην πρώτη γραμμή της ενότητας:
Εισαγωγές System.Data.OleDb
Η 4
Πληκτρολογήστε το παρακάτω για να δηλώσετε τις μεταβλητές σας μέσα " Private Sub Button1_Click : "
Dim MyConnection Όπως OleDbConnection
Dim myCommand Όπως OleDbCommand
Dim mySQLString Όπως String
5
Πληκτρολογήστε το παρακάτω για να δημιουργήσετε και να ανοίξετε μια σύνδεση με τη βάση δεδομένων της Access :
MyConnection = Νέα OleDbConnection ( " Provider = Microsoft.Jet.OLEDB.4.0 ? προέλευσης δεδομένων = C : \\ test.mdb ? " )
myConnection.Open ( )
Edit " Πηγή " και πληκτρολογήστε τη διαδρομή όπου έχετε αποθηκεύσει το "Test" βάση δεδομένων
Η 6
Πληκτρολογήστε το παρακάτω, για να δημιουργήσει το " MyTable " πίνακα της Access : .
mySQLString = " CREATE TABLE MyTable ( FIRST_NAME ΚΕΙΜΕΝΟ , LAST_NAME ΚΕΙΜΕΝΟ ) "
myCommand = Νέα OleDbCommand ( mySQLString , MyConnection )
myCommand.ExecuteNonQuery ( )
Η 7
Πληκτρολογήστε τα παρακάτω για να προσθέσετε μια νέα εγγραφή δεδομένων στο " MyTable " πίνακα:
mySQLString = " INSERT INTO MyTable ΑΞΙΕΣ ( « JOHN » , « SMITH ') "
myCommand = νέα OleDbCommand ( mySQLString , MyConnection )
myCommand.ExecuteNonQuery ( )
Πατήστε το " F5 " για να τρέξετε το πρόγραμμά σας και κάντε κλικ στο " Button1 " για να εκτελέσει τον κώδικα .
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα