Įvedimo langelio funkcija

Dialogo lange pateikiamas raginimą, kuriame vartotojas gali įvesti tekstą. Įvestis priskiriama kintamajam.

KomandaĮvedimo langelis – tai patogus būdas įvesti tekstą naudojantis dialogu. Patvirtinkite įvestį spustelėdami Gerai arba paspausdami reikšmę grąžinančią funkciją. Įvestis grąžinama taip, kaip funkcija grąžina reikšmę. Jei užversite dialogo langą naudodami atšaukimo komandą, Įvedimo langelis grąžins nulinio ilgio eilutę ("").

Sintaksė:


InputBox (Msg As String[, Title As String[, Default As String[, x_pos As Integer, y_pos As Integer]]]])

Grąžinama reikšmė:

Eilutė

Parametras:

Msg: Eilučių reiškinys rodomas kaip pranešimas dialogo lange.

Antraštė: Eilutės reiškinys rodomas kaip pranešimas dialogo lange.

Numatytasis: eilutės reiškinys teksto laukelyje rodomas kaip numatytasis, jei kitaip nenurodoma.

x_pos: Sveikasis reiškinys, nurodantis horizontalią dialogo vietą. Pozicija yra absoliuti koordinatė ir nenurodo raštinės programos lango.

x_pos: Sveikasis reiškinys, nurodantis vertikalią dialogo vietą. Pozicija nusakoma absoliučiomis koordinatėmis ir nenurodo raštinės programos lango.

Jei x_pos ir y_pos praleisti, tai dialogas centrinamas ekrano viduryje. Pozicija nurodoma twips.

Pavyzdys:


Sub ExampleInputBox
Dim sText As String
    sText = InputBox ("Prašome įvesti frazę:","Gerbiamas vartotojau")
    MsgBox ( sText , 64, "Frazės patvirtinimas")
End Sub

Paremkite mus!