### Sample InputList

'Example InputList
`Sub InputListEx_Action
Dim b As Button = Sender
labelInformation.Text = "You have selected Button " & CRLF & b.Text
Dim items As List = Array("Item #1", "Item #2", "Item #3", "Item #4")
Dim rt As Int = fx.InputList(MainForm, items, "Please choose an item", b.Text, 0)
Dim item As String
If rt >= 0 Then
item = $"Item Selected: ${items.Get(rt)}"$
Else
item = "No Item selected."
End If
fx.Msgbox(Null, item, "Result " & b.Text)
End Sub`

Changed: , Category: MsgBox and InputList, File: T6C222M1637.htm, ID: 1637