Dim p As New Process
p.StartInfo.FileName = apppath & appname
p.Start()
p.WaitForInputIdle()
If Not CBool(p.MainWindowHandle) Then
    Do
         System.Threading.Thread.Sleep(100)
         pWindowHandle = Process.GetProcessById(p.Id).MainWindowHandle
    Loop While pWindowHandle = 0
Else
    pWindowHandle = p.MainWindowHandle
End If
 
If p IsNot Nothing Then SetParent(p.MainWindowHandle, Me.Panel1.Handle)