Public Class Form1
    Private WithEvents Lb As New ListBox With {.Dock = DockStyle.Fill, .Parent _
      = Me}
 
    Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) _
      Handles MyBase.Load
        Lb.Items.Add("C:\Programme\VideoLan\VLC\vlc.exe")
    End Sub
 
    Private Sub Lb_SelectedIndexChanged(sender As Object, e As _
      System.EventArgs) Handles Lb.SelectedIndexChanged
        Process.Start(Lb.SelectedItem.ToString)
    End Sub
End Class