Programming Reference Manual

InputSelectBox

 
Syntax
 
InputSelectBox[$](Prompt$[, Title$][, Default$][, XPos, YPos]
[,Selection][, HelpFile, Context])
 
Description
Display an TRADIUM styled input box where the user can select a value from a list of array element parsed in selection. Pressing the OK button returns the element  sequence number, equivalent to the index of the JOINed array. Pressing the Cancel button returns a null string.
 
Parameter
Description
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.
Also, alternate captions for the button(s) can be used by adding a vertical bar sign ("|") and a caption for each button.
Default$ 
Use this string value as the initial value in the input box.
Use a valid value that matches one item in selection.
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.
YPos 
When the dialog is put up the top edge will be at this screen position. If this is omitted then the dialog will be centered.
Selection
A list of JOINed array elements, divided by a vertical bar "|".
HelpFile
For use with compiled .hlp files. Specify path and filename.
Context
For use with compiled .hlp files. specify the context ID for context sensitive help functions when pressing F1.
See Also
InputBox, InputDateBox, InputMaskedBox, InputStandardBox.
Example
 
Sub Main
 
   Dim A$(0 To 3)
   A$(0) = "One"
   A$(1) = "Two"
   A$(2) = "Three"
   A$(3) = "Four"
 
   L$ = InputSelectBox$("Enter some text:", _
           "<span style='color: #004080; font-weight: bold;'>Input</span> Box Example|Allright|Never", "Two", Selection:=Join(A$(),"|"))
 
    Debug.Print L$
 
End Sub