Funkcja InputBox

Dotyczy
Access dla Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Wyświetla monit w oknie dialogowym, czeka, aż użytkownik wprowadzi tekst lub kliknie przycisk, i zwraca ciąg zawierający zawartość pola tekstowego.

Składnia

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

W składni funkcji InputBox występują następujące argumenty:

Argumenty argumentów Opis
monit Argument wymagany. Wyrażenie tekstowe wyświetlane jako komunikat w oknie dialogowym. Maksymalna długość monitu to w przybliżeniu 1024 znaki, w zależności od szerokości użytych znaków. Jeśli wiersz monitu składa się z więcej niż jednego wiersza, można je rozdzielić za pomocą znaku powrotu karetki (Chr(13)), znaku nowego wiersza (Chr(10)) lub kombinacji powrotu karetki/nowego wiersza (Chr(13) & Chr(10)) między poszczególnymi wierszami.
Tytuł Argument opcjonalny. Wyrażenie ciągu wyświetlane na pasku tytułu okna dialogowego. Jeśli tytuł zostanie pominięty, nazwa aplikacji zostanie umieszczona na pasku tytułu.
wartość domyślna Argument opcjonalny. Jeśli nie podano innych danych wejściowych, wyrażenie ciągu jest wyświetlane w polu tekstowym jako odpowiedź domyślna. W przypadku pominięcia domyślnego pole tekstowe jest wyświetlane puste.
XPOS Argument opcjonalny. Wyrażenie liczbowe określające w twipach odległość lewej krawędzi okna dialogowego w poziomie od lewej krawędzi ekranu. Jeśli xpos zostanie pominięty, okno dialogowe zostanie wyśrodkowane w poziomie.
ypos Argument opcjonalny. Wyrażenie liczbowe określające w twipach odległość górnej krawędzi okna dialogowego od górnej krawędzi ekranu. Jeśli ypos zostanie pominięty, okno dialogowe zostanie umieszczone pionowo mniej więcej w jednej trzeciej odległości w dół ekranu.
plik pomocy Argument opcjonalny. Wyrażenie tekstowe identyfikujące plik Pomocy, który ma zostać użyty w celu udostępnienia kontekstowej Pomocy dla okna dialogowego. Jeśli helpfile jest podany, należy również podać kontekst .
kontekst Argument opcjonalny. Wyrażenie liczbowe będące numerem kontekstu Pomocy przypisanym do odpowiedniego tematu Pomocy przez autora Pomocy. Jeśli podano kontekst , należy również podać helpfile .

Uwagi

Po podaniu zarówno pliku pomocy, jak i kontekstu, użytkownik może nacisnąć klawisz F1 (Windows) lub POMOC (Macintosh), aby wyświetlić odpowiedni temat Pomocy. Niektóre aplikacje hosta automatycznie dodają przycisk Pomoc do okna dialogowego. Jeśli użytkownik kliknie przycisk OK lub naciśnie klawisz ENTER, funkcja InputBox zwróci zawartość pola tekstowego. Jeśli użytkownik kliknie przycisk Anuluj, funkcja zwróci ciąg o zerowej długości ("").

Uwaga

Aby określić więcej niż pierwszy nazwany argument, musisz użyć InputBox w wyrażeniu. Aby pominąć niektóre argumenty pozycyjne, należy użyć odpowiadającego im ogranicznika przecinka.

Przykład

Uwaga

Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.

W tym przykładzie pokazano różne sposoby używania funkcji InputBox w celu monitowania użytkownika o wprowadzenie wartości. Jeśli pozycje x i y zostaną pominięte, okno dialogowe zostanie automatycznie wyśrodkowane dla odpowiednich osi. Zmienna MyValue zawiera wartość wprowadzoną przez użytkownika po kliknięciu przycisku OK lub naciśnięciu klawisza ENTER . Jeśli użytkownik kliknie przycisk Anuluj, zostanie zwrócony ciąg znaków o zerowej długości.


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)