sDlgTitle | (String) Title of the input window |
---|---|
nStyle | (Long) Bit flags defining window type and content.
Hexadecimal numbers can be entered by adding a prefix: for JavaScript it is 0x and for VBScript it is &H. For example, 0x10 or &H10 in hexadecimal represents 16 in decimal. It is possible to enter the following styles or their combinations as a sum: &H100 - String are sorted out in the list
&H200 - Multiple strings from the list can be selected
&H20000 - Return the selected value as the index from the list
&H10000000 - Window will be displayed on up of all windows |
vValue | [for read and write] (Variant)
Before calling: the default value for selection from the list (number or text string).
After calling: the selected value |
vStrings | (Variant) String array making the list. See the example. |
Dim Value, Strings
Value = "second"
Strings = Pm.Array1("first", "second", "third")
If Pm.InputBoxForStringSelection("Select string", 0, Value, Strings) Then
' ... The text string selected OK
Pm.Debug Value
End If
Dim iVal, Value, Strings
Value = Pm.Array1("second", "third")
Strings = Pm.Array1("first", "second", "third")
If Pm.InputBoxForStringSelection("Select string", &H200 + &H20000, Value, Strings) Then
' ... The text string selected OK
For iVal = 0 To UBound(Value) + 1 - 1
Pm.Debug Value(iVal)
Next
End If