InputBox$ Function

Syntax              InputBox[$](Prompt$[, Title$][, Default$][, XPos, YPos])

Group                User Input

Description       Display an input box where the user can enter a line of text. Pressing the OK button returns the string entered. Pressing the Cancel button returns a null string.

Prompt$              Use this string value as the prompt in the input box.

Title$                   Use this string value as the title of the input box. If this is omitted then the input box does not have a title.

Default$              Use this string value as the initial value in the input box. If this is omitted then the initial value is blank.

XPos                    When the dialog is put up the left edge will be at this screen position. If this is omitted then the dialog will be centered.

Example            '#Language "WWB-COM"
Sub Main
    Dim L$
    L$ = InputBox$("Enter some text:", _
           "Input Box Example","asdf")
    Debug.Print L$
End Sub