Spis treści
Indeks 🔎︎

# Funkcja InputBox

Wyświetla monit w oknie dialogowym, pozwalając na wprowadzenie tekstu przez użytkownika. Wprowadzone dane są przypisywane do zmiennej.

Instrukcja InputBox stanowi wygodny sposób wprowadzania tekstu w oknie dialogowym. Zatwierdzenia dokonuje się poprzez kliknięcie przycisku OK lub naciśnięcie klawisza Enter. Wprowadzone dane są zwracane w postaci wartości funkcji. W przypadku zamknięcia okna dialogowego przez kliknięcie przycisku Anuluj, funkcja InputBox zwraca ciąg zerowej długości ("").

## Składnia:

    InputBox (komunikat As String[, nazwa As String[, domyślny As String[, pozycja_x As Integer, pozycja_y As Integer]]]])

## Zwracana wartość:

Ciąg

## Parametr:

Komunikat: Ciąg wyświetlany w postaci komunikatu w oknie dialogowym.

Nazwa: Ciąg wyświetlany na pasku tytułu okna dialogowego.

Domyślny: Ciąg wyświetlany w polu tekstowym jako wartość domyślna w przypadku braku innego wpisu.

Pozycja_x: Wyrażenie w postaci liczby całkowitej określające położenie okna dialogowego w poziomie. Pozycja jest wyrażona we współrzędnych bezwzględnych i nie odnosi się do okna aplikacji biurowej.

Pozycja_y: Wyrażenie w postaci liczby całkowitej określające położenie okna dialogowego w pionie. Pozycja jest wyrażona we współrzędnych bezwzględnych i nie odnosi się do okna aplikacji biurowej.

W przypadku pominięcia parametrów pozycja_x i pozycja_y okno dialogowe jest umieszczone centralnie na ekranie. Pozycja jest wyrażona w jednostce twip.

## Przykład:

    Sub ExampleInputBox
    Dim sText As String
        sText = InputBox ("Wpisz zdanie:","Szanowni Państwo")
        MsgBox ( sText , 64, "Potwierdzenie zdania")
    End Sub