InputBox Function
A párbeszĂ©dablakban megjelenĂt egy rĂ©szt, amelyben a felhasználĂł megadhatja a bemeneti szöveget. A bemenet hozzárendelĹ‘dik egy változĂłhoz.
Az InputBox utasĂtás egy kĂ©nyelmes mĂłdszer a szöveg párbeszĂ©dablakon keresztĂĽli megadására. ErĹ‘sĂtse meg a bemenetet az OK gombra törtĂ©nĹ‘ kattintással vagy a Return billentyű megnyomásával. A bemenetet a rendszer a fĂĽggvĂ©ny visszatĂ©rĂ©si Ă©rtĂ©kekĂ©nt adja vissza. Ha a MĂ©gse gombbal zárja be a párbeszĂ©dablakot, akkor az InputBox nulla hosszĂşságĂş karakterláncot ("") ad vissza.
Szintaxis:
InputBox (Ăśzenet As String[, CĂm As String[, AlapĂ©rtelmezĂ©s As String[, x_poz As Integer, y_poz As Integer]]]])
Visszatérési érték:
String (karakterlánc)
Paraméter:
Üzenet: String (karakterlánc) kifejezés, amely üzenetként jelenik meg a párbeszédablakban.
CĂm: String (karakterlánc) kifejezĂ©s, amely a párbeszĂ©dablak cĂmsorában jelenik meg.
Alapértelmezett: String (karakterlánc) kifejezés, amely alapértelmezettként jelenik meg a szövegmezőben, ha semmilyen más bevitelt nem adtak meg.
x_poz: Integer (egĂ©sz szám) kifejezĂ©s, amely megadja a párbeszĂ©dablak vĂzszintes helyĂ©t. A pozĂciĂł abszolĂşt koordináta, Ă©s nem az irodai alkalmazás ablakára vonatkozik.
y_poz: Integer (egĂ©sz szám) kifejezĂ©s, amely megadja a párbeszĂ©dablak fĂĽggĹ‘leges helyĂ©t. A pozĂciĂł abszolĂşt koordináta, Ă©s nem az irodai alkalmazás ablakára vonatkozik.
Ha az x_poz Ă©s az y_poz nincs megadva, akkor a párbeszĂ©dablak a kĂ©pernyĹ‘ közepĂ©re lesz igazĂtva. A pozĂciĂł twipben van megadva.
PĂ©lda:
Sub ExampleInputBox
Dim sText As String
sText = InputBox ("Kérjük, adjon meg egy kifejezést:","Kedves felhasználó")
MsgBox ( sText , 64, "A kifejezĂ©s megerĹ‘sĂtĂ©se")
End Sub