Funkcija InputBox
Pokaže poziv in pogovorno okno, v katerega lahko uporabnik vnese svoje besedilo. Vneseno besedilo se priredi spremenljivki.
Ukaz InputBox je udoben način za vnos besedila prek pogovornega okna. Potrdite vneseno s tem, da kliknete V redu ali da pritisnete vnašalko. Vneseno besedilo se vrne kot povratna vrednost funkcije. Če pogovorno okno zaprete s Prekliči, bo InputBox vrnila prazen niz ("").
Skladnja:
InputBox (Sporočilo As String[, Naslov As String[, Privzeto As String[, x_pol As Integer, y_pol As Integer]]]])
Vrnjena vrednost:
String
Parameter:
Sporočilo: Niz, ki se prikaže kot sporočilo v pogovornem oknu.
Naslov: Niz za naslovno vrstico v pogovornem oknu.
Privzeto: niz, ki se prikaže kot privzeto besedilo v polju za besedilo, če uporabnik ne vnese ničesar.
x_pol: Celoštevilski izraz, ki določa vodoravni položaj pogovornega okna. Položaj je absolutna koordinata in ni povezana s programom, v katerem teče.
y_pol: Celoštevilski izraz, ki določa navpični položaj pogovornega okna. Položaj je absolutna koordinata in ni povezan s programom, v katerem teče.
Če x_pol in y_pol izpustite, se bo pogovorno okno nahajalo na sredi zaslona. Položaj določimo v twipih.
Primer:
Sub ExampleInputBox
Dim sText As String
sBesedilo = InputBox ("Prosimo, vtipkajte stavek:","Dragi uporabnik")
MsgBox ( sBesedilo , 64, "Za potrditev stavka")
End Sub