If e.Form.Controls("TextBox1").value IsNot Nothing Then For i As Integer = 0 To e.Form.Controls("TextBox1").Lines.Length - 1 Dim Proc As New Process Proc.File = e.Form.Controls("TextBox1").Lines(i) Proc.Start() system.threading.thread.sleep(100) Next End If