Συνάρτηση InputBox

Ισχύει για
Access για Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Εμφανίζει ένα μήνυμα σε ένα παράθυρο διαλόγου, περιμένει τον χρήστη να εισαγάγει κείμενο ή να κάνει κλικ σε ένα κουμπί και επιστρέφει μια συμβολοσειρά που περιέχει τα περιεχόμενα του πλαισίου κειμένου.

Σύνταξη

InputBox(prompt [, title ] [, default ] [, xpos ] [, ypos ] [, helpfile ] [, context ] )

Η σύνταξη της συνάρτησης InputBox περιλαμβάνει τα εξής ορίσματα:

Επιχείρημα Περιγραφή
προτροπή Υποχρεωτικό. Παράσταση συμβολοσειράς που εμφανίζεται ως μήνυμα στο παράθυρο διαλόγου. Το μέγιστο μήκος της προτροπής είναι περίπου 1024 χαρακτήρες, ανάλογα με το πλάτος των χαρακτήρων που χρησιμοποιούνται. Εάν η προτροπή αποτελείται από περισσότερες από μία γραμμές, μπορείτε να διαχωρίσετε τις γραμμές χρησιμοποιώντας ένα χαρακτήρα επαναφοράς (Chr(13)), ένα χαρακτήρα αλλαγής γραμμής (Chr(10)) ή ένα συνδυασμό χαρακτήρων αλλαγής γραμμής (Chr(13) & Chr(10)) μεταξύ κάθε γραμμής.
Τίτλος Προαιρετικό. Η παράσταση συμβολοσειράς εμφανίζεται στη γραμμή τίτλου του παραθύρου διαλόγου. Εάν παραλείψετε τον τίτλο, το όνομα της εφαρμογής τοποθετείται στη γραμμή τίτλου.
προεπιλογή Προαιρετικό. Παράσταση συμβολοσειράς που εμφανίζεται στο πλαίσιο κειμένου ως η προεπιλεγμένη απόκριση εάν δεν παρέχεται κάποια άλλη εισαγωγή. Εάν παραλείψετε την προεπιλογή, το πλαίσιο κειμένου εμφανίζεται κενό.
xpos Προαιρετικό. Αριθμητική παράσταση που καθορίζει, σε twip, την οριζόντια απόσταση του αριστερού άκρου του παραθύρου διαλόγου από το αριστερό άκρο της οθόνης. Εάν παραλειφθεί το όρισμα xpos , το παράθυρο διαλόγου κεντράρεται οριζόντια.
Ypos Προαιρετικό. Αριθμητική παράσταση που καθορίζει, σε twip, την κατακόρυφη απόσταση του επάνω άκρου του παραθύρου διαλόγου από το επάνω μέρος της οθόνης. Εάν παραλειφθεί το ypos , το παράθυρο διαλόγου τοποθετείται κατακόρυφα περίπου στο ένα τρίτο της διαδρομής.
αρχείο βοήθειας Προαιρετικό. Παράσταση συμβολοσειράς που προσδιορίζει το αρχείο Βοήθειας που θα χρησιμοποιηθεί για την παροχή σχετικής Βοήθειας για το παράθυρο διαλόγου. Εάν παρέχεται αρχείο βοήθειας , πρέπει επίσης να παρέχεται το περιβάλλον .
Πλαίσιο Προαιρετικό. Αριθμητική παράσταση που είναι ο αριθμός περιβάλλοντος Βοήθειας που έχει αντιστοιχιστεί στο κατάλληλο θέμα της Βοήθειας από τον συντάκτη της Βοήθειας. Εάν παρέχεται περιβάλλον , πρέπει επίσης να παρέχεται το αρχείο βοήθειας .

Παρατηρήσεις

Όταν παρέχονται και το αρχείο βοήθειας και το περιβάλλον , ο χρήστης μπορεί να πιέσει το πλήκτρο F1 (Windows) ή τη Βοήθεια (Macintosh) για να δει το θέμα της Βοήθειας που αντιστοιχεί στο περιβάλλον. Ορισμένες κεντρικές εφαρμογές προσθέτουν επίσης αυτόματα ένα κουμπί Βοήθειας στο παράθυρο διαλόγου. Εάν ο χρήστης κάνει κλικ στο κουμπί OK ή πιέσει το πλήκτρο ENTER, η συνάρτηση InputBox επιστρέφει το περιεχόμενο του πλαισίου κειμένου. Εάν ο χρήστης κάνει κλικ στο κουμπί "Άκυρο", η συνάρτηση επιστρέφει μια συμβολοσειρά μηδενικού μήκους ("").

Σημείωση

Για να καθορίσετε περισσότερα από το πρώτο όρισμα, πρέπει να χρησιμοποιήσετε το InputBox σε μια παράσταση. Για να παραλείψετε ορισμένα ορίσματα θέσης, πρέπει να συμπεριλάβετε τον αντίστοιχο οριοθέτη με κόμμα.

Παράδειγμα

Σημείωση

Τα παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε " Αναφορά προγραμματιστών " στην αναπτυσσόμενη λίστα δίπλα στην επιλογή "Αναζήτηση " και εισαγάγετε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.

Αυτό το παράδειγμα δείχνει διάφορους τρόπους χρήσης της συνάρτησης InputBox για να ζητήσετε από τον χρήστη να εισαγάγει μια τιμή. Εάν παραλειφθούν οι θέσεις x και y, το παράθυρο διαλόγου κεντράρεται αυτόματα για τους αντίστοιχους άξονες. Η μεταβλητή MyValue περιέχει την τιμή που εισάγει ο χρήστης εάν ο χρήστης κάνει κλικ στο κουμπί OK ή πατήσει το πλήκτρο ENTER. Εάν ο χρήστης κάνει κλικ στο κουμπί "Άκυρο", επιστρέφεται μια συμβολοσειρά μηδενικού μήκους.


Dim Message, Title, Default, MyValue
Message = "Enter a value between 1 and 3"  ' Set prompt.
Title = "InputBox Demo"    ' Set title.
Default = "1"    ' Set default.
' Display message, title, and default value.
MyValue = InputBox(Message, Title, Default)
' Use Helpfile and context. 
' The Help button is added automatically.
MyValue = InputBox(Message, Title,,,,"DEMO.HLP", 10)
' Display dialog box at position 100, 100.
MyValue = InputBox(Message, Title, Default, 100, 100)