InputBox Function

Zobrazí dialógové okno s výzvou umožňujúcou používateľovi zadať text do poľa. Vstup je priradený premennej.

Príkaz InputBox je vhodná metóda pre zadávanie textu v dialógu. Vstup potvrdíte kliknutím na OK alebo stlačením klávesy Enter. Vstup získate ako návratovú hodnotu funkcie. Ak zavriete dialóg pomocou Zrušiť, InputBox vráti reťazec nulovej dĺžky ("").

Syntax:

InputBox (Správa As String[, Titulok As String[, Prednastavený As String[, Pozícia_x As Integer, Pozícia_y As Integer]]]])

Návratová hodnota:

Reťazec

Parameter:

Správa: Reťazec, ktorý sa zobrazí ako správa v dialógovom okne.

Titulok: Reťazec, ktorý sa zobrazí v titulnej lište dialógu.

Predvolený: Reťazec, ktorý sa zobrazí v textovom poli ako predvolený, ak nie je zadaný vstup.

Pozícia_x: Celočíselný výraz, ktorý určuje vodorovné umiestnenie dialógu. Pozícia je absolútna súradnica a nevzťahuje sa k oknu aplikácie.

Pozícia_y: Celočíselný výraz, ktorý určuje zvislé umiestnenie dialógu. Pozícia je absolútna súradnica a nevzťahuje sa k oknu aplikácie.

Ak sú Pozícia_x a Pozícia_y vynechané, dialógové okno sa na obrazovke vycentruje. Pozícia sa určuje v twipoch.

Príklad:

Sub ExampleInputBox

Dim sText As String

    sText = InputBox ("Zadaj heslo:","Drahý používateľ")

    MsgBox ( sText , 64, "Zopakuj heslo")

End Sub