IBM Lotus Symphony
|
Viser en forespørsel i en dialogboks der brukeren kan skrive inn tekst. Inndataene tildeles til en variabel.
InputBox-setningen er en nyttig metode for å angi tekst via en dialogboks. Bekreft inndataene ved å klikke på OK eller trykke på Retur. Inndataene returneres som funksjonens returverdi. Hvis du lukker dialogboksen med Avbryt, returnerer InputBox en streng med nullengde ("").
InputBox (Mld som streng[, Tittel som Streng[, Standard som streng[, x-pos som heltall, y-pos som heltall]]]])
Streng
Mld: Strenguttrykk som vises som meldingen i dialogboksen.
Tittel: Strenguttrykk som vises i tittellinjen på dialogboksen.
Standard: Strenguttrykk som vises i tekstboksen som standard hvis ingen andre inndata blir angitt.
x-pos: Heltallsuttrykk som angir den vannrette posisjonen til dialogboksen. Posisjonen er en absolutt koordinat og refererer ikke til vinduet i Lotus Symphony-applikasjonen.
y-pos: Heltallsuttrykk som angir den loddrette posisjonen til dialogboksen. Posisjonen er en absolutt koordinat og refererer ikke til vinduet i Lotus Symphony-applikasjonen.
Hvis x-pos og y-pos utelates, blir dialogboksen midtstilt på skjermen. Posisjonen angis i twips.
Sub ExampleInputBox
Dim sText As String
sText = InputBox ("Skriv inn en frase:","Til brukeren")
MsgBox ( sText , 64, "Bekreftelse på frase")
End Sub