Public Function GetCustomInput (
Message As String,
Optional WindowTitle As String = "" ,
Optional DefaultText As String = "",
Optional InputMask As String = "" ,
Optional HideCancelButton As Boolean = False
) As String
Display a custom input dialog, like InputBox.
The default input text (default="")
Dim s As String
s = xf.Interact.GetCustomInput(Message)
s = xf.Interact.GetCustomInput(Message, WindowTitle, DefaultText, InputMask, HideCancelButton)
Dim s as String
s = GetCustomInput("Please enter a password", "Enter Password", True)