1 Ανοίξτε το Microsoft Visual Basic Express , και κάντε κλικ στο "New Project ... " στο αριστερό παράθυρο της οθόνης σας . Κάντε διπλό κλικ στο " Εφαρμογή κονσόλας . " Πατήστε το πλήκτρο " Ctrl " και "A" και στη συνέχεια πατήστε "Διαγραφή " για να αφαιρέσετε τον τρέχοντα κωδικό . 2
Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα σε λειτουργική μονάδα " Module1.vb " σας για να εκτελέσετε ένα ερώτημα και να προσθέσετε δύο πεδία στον πίνακα " Προϊόντα" στη βάση δεδομένων Northwind .
Εισαγωγές System.Data.OleDb
Module Module1
Sub Main ( )
Dim northwindConn Όπως OleDbConnection
Dim sqlComm Όπως OleDbCommand
Dim strSQL Όπως String
northwindConn = Νέα OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 ? προέλευσης δεδομένων = C : \\ Northwind 2007.accdb ? " )
northwindConn.Open ( )
strSQL = " ALTER TABLE Προϊόντα " & _
" ADD COLUMN Product_I Κείμενο ( 30 ) , Product_II κείμενο ( 30 ) ? "
sqlComm = Νέα OleDbCommand ( strSQL , northwindConn )
sqlComm.ExecuteNonQuery ( )
MsgBox ( " Προστέθηκε δύο πεδία με επιτυχία στον πίνακα Products . » )
northwindConn.Close ( )
End Sub
End Module
εικόνων 3
Επεξεργαστείτε την ακόλουθη γραμμή κώδικα και τον τύπο η διαδρομή της βάσης δεδομένων σας :
OleDbConnection ( " Provider = Microsoft.ACE.OLEDB.12.0 ? προέλευσης δεδομένων = C : \\ Northwind 2007.accdb ? " )
Πατήστε το " F5 " για να εκτελέσετε το πρόγραμμά σας .
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα