Εκκίνηση της Microsoft Access , κάντε κλικ στην επιλογή "Blank Database , " και κάντε κλικ στο κουμπί "Δημιουργία " για να δημιουργήσετε ένα νέο βάσης δεδομένων. Κάντε κλικ στο " Εργαλεία βάσης δεδομένων " και κάντε κλικ στο " Visual Basic" για να ξεκινήσει το πρόγραμμα επεξεργασίας VBA . . Κάντε κλικ στο "Εισαγωγή" μενού και κάντε κλικ στο " Ενότητα " για να εισάγετε μια νέα λειτουργική μονάδα κώδικα 2
αντιγραφή και επικόλληση του παρακάτω κώδικα για να δημιουργήσετε έναν πίνακα και να εισάγετε μια γραμμή δεδομένων χρησιμοποιώντας τη δήλωση SQL :
Private Sub createTable ( )
Dim strSQL Όπως String
strSQL = " CREATE TABLE myTbl ( ΚΕΙΜΕΝΟ ΟΝΟΜΑ , ΕΠΙΘΕΤΟ ΚΕΙΜΕΝΟ ) "
DoCmd.RunSQL ( strSQL )
strSQL = " INSERT INTO myTbl ΑΞΙΕΣ ( « JOHN » , « SMITH ') "
DoCmd.SetWarnings Λάθος
DoCmd.RunSQL ( strSQL )
End Sub
εικόνων 3
Πατήστε το " F5 " για να εκτελέσετε τη διαδικασία .
Η 4
την εφαρμογή Microsoft Excel , κάντε κλικ στην καρτέλα "Προγραμματιστής " και κάντε κλικ στο " Εγγραφή Macro " για να ξεκινήσετε την εγγραφή μιας μακροεντολής VBA . Κάντε κλικ στο " OK " στο " Καταγραφή μακροεντολής " παράθυρο διαλόγου . Πληκτρολογήστε " 2 " στην Α1 και " 4 " σε " B1". Κάντε κλικ στο κουμπί " Stop Recording" και κάντε κλικ στο " Visual Basic" για να ξεκινήσει το πρόγραμμα επεξεργασίας VBA
5
Αναπτύξτε τις " μονάδες " φάκελο και κάντε διπλό κλικ στο " Module1 " για να προβάλετε το ακόλουθο κώδικα μακροεντολής : .
Range ( "A1" ) . Επιλέξτε
ActiveCell.FormulaR1C1 = " 2 "
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα