Promotic
WikipediaLinkedInYoutubeTwitterFacebook

InputBoxForStringSelection - method of object Pm

Description:
Enables to select the string (or more substrings if the &H200 style is set) from the list in the input window.

This method is obsolete (but functional) and is replaced by the Pm.SelectionDialog method.

Syntax:
InputBoxForStringSelection(sDlgTitle As String, nStyle As Long, vValue As Variant, vStrings As Variant) As Boolean
Calling:
b = Pm.InputBoxForStringSelection("SelectString", nStyle, vValue, vStrings)
Parameters:
sDlgTitle(String) Title of the input window
nStyle(Long) It is possible to enter the following styles or their combinations using sum:
&H100 - String are sorted out in the list
&H200 - It is possible to select multiple strings from the list
&H20000 - Return the selected value as the index from the list
&H10000000 - Window will be displayed on top of all windows
vValue[for read and write] (Variant)
on the calling: the preset value for the selection from the list (entered by the number or the string).
after the calling: the selected value.
vStrings(Variant) String array making the list. See the example.
Return Values:
true - If the window has been closed by the OK button.
false - If the window has been closed by the Cancel button.
Note:
This method is not functional for Web Panels.
Example1:
Selection of one string from the list:
Dim vValue, sStrings
vValue = "second"
sStrings = Array("first","second","third")
If Pm.InputBoxForStringSelection("Choose the string", 0, vValue, sStrings) Then
  '... String selected OK
  Pm.Debug vValue
End If
Example2:
Selection of multiple strings from the list, in addition values returned as indexes to the list
Dim i, vValue, sStrings
vValue = Array("second","third")
sStrings = Array("first","second","third")
If Pm.InputBoxForStringSelection("Choose the string", &H200+&H20000, vValue, sStrings) Then
  '... String selected OK
  For i=0 To Value.UpperBound
    Pm.Debug vValue(0)
  Next
End If
Navigation:
 
- Pm
 
- Abs
- Cos
- E
- Exp
- InputBoxForStringSelection
 
 
- LN2
- PI
- Pow
- Sin
- Tan
© MICROSYS, spol. s r. o.Tavičská 845/21 703 00 Ostrava-Vítkovice