### Sample InputList select file or folder

'Example InputList select file or folder
`Sub FileChooserEx_Action
Dim b As Button = Sender
labelInformation.Text = "You have selected Button " & CRLF & b.Text
Dim items As List = File.ListFiles(File.DirApp)
Dim rt As Int = fx.InputList(Null, items, "Select a file or folder from the list", b.Text, -1)
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: T6C222M1638.htm, ID: 1638