Περιεχόμενο
Η εκτύπωση των περιεχομένων ενός ListBox της Visual Basic for Applications (VBA) μπορεί να σας βοηθήσει να δείτε το περιεχόμενο του στοιχείου ελέγχου ενώ εντοπίζετε σφάλματα σφάλματος ενός προγράμματος. Το VBA μπορεί να χρησιμοποιηθεί σε οποιαδήποτε εφαρμογή του Microsoft Office, συμπεριλαμβανομένης της Access. Ένα ListBox τυπικά χρησιμοποιείται στην Access για να δώσει στον χρήστη πρόσθετες επιλογές ταξινόμησης δεδομένων. Χρησιμοποιήστε την ιδιότητα ItemData για να αποκτήσετε πρόσβαση στα στοιχεία του πλαισίου, καθορίζοντας τον αριθμό της γραμμής και εμφανίζοντας τα μέσα από το παράθυρο Άμεση.
Οδηγίες
Γράψτε τα προγράμματα VBA στην Access (Hemera Technologies / AbleStock.com / Getty Images)-
Ανοίξτε τη Microsoft Access, κάντε κλικ στην καρτέλα Δημιουργία και κάντε κλικ στο "Σχεδιασμός φόρμας" για να δημιουργήσετε μια νέα φόρμα. Κάντε κλικ στο πλαίσιο λίστας (List Box) στον πίνακα ελέγχου και κάντε κλικ στη φόρμα για να προσθέσετε ένα νέο σύνθετο πλαίσιο. Κάντε κλικ στο κουμπί για να προσθέσετε ένα νέο κουμπί. Προσθέστε ένα άλλο κουμπί χρησιμοποιώντας την ίδια διαδικασία.
-
Κάντε δεξιό κλικ στο πρώτο κουμπί και κάντε κλικ στην επιλογή Ιδιότητες. Κάντε κλικ στην καρτέλα Συμβάν, επιλέξτε "[Διαδικασία συμβάντος]" και κάντε κλικ στην έλλειψη για να δημιουργήσετε ένα συμβάν για αυτό το κουμπί.
-
Προσθέστε τον ακόλουθο κώδικα στο συμβάν κλικ στο κουμπί για να προσθέσετε τέσσερα στοιχεία στο πλαίσιο:
Me.List0.AddItem ("item 2") Me.List0.AddItem ("item 3") Me.List0.AddItem ("item 2") Me.List0.AddItem ("item 1" σημείο 4 ")
-
Επιστρέψτε στη Microsoft Access και κάντε δεξί κλικ στο πρώτο κουμπί. Κάντε κλικ στην επιλογή Ιδιότητες και κάντε κλικ στην καρτέλα Συμβάν, επιλέξτε "[Διαδικασία συμβάντος]" και κάντε κλικ στην έλλειψη για να δημιουργήσετε ένα συμβάν κλικ για αυτό το κουμπί.
-
Προσθέστε τον ακόλουθο κώδικα για να εκτυπώσετε τα περιεχόμενα του ListBox στο παράθυρο Immediate:
Dim X Για X = 0 έως 3 Debug.Print (Me.List0.ItemData (X)) Επόμενο X
-
Επιστρέψτε στη Microsoft Access και κάντε κλικ στην επιλογή "Προεπισκόπηση" για να ανοίξετε τη φόρμα. Κάντε κλικ στο πρώτο κουμπί για να συμπληρώσετε τον πίνακα ελέγχου λίστας. κάντε κλικ στο δεύτερο κουμπί για να εκτυπώσετε τα περιεχόμενα στο παράθυρο Άμεση.
Τι χρειάζεστε
- Microsoft Access