VB Forum / VB Syntax / August 2008

The following prog does start the app except the two statements:
AppActivate(ProcID)
SendKeys.SendWait("username")
cause some kind of unspecified error where I'm supposed to send an error
report to microsoft.  Is this the correct prog?  Could you pls suggest a fix?
thx.,
ep.
---------------------------------------------------------------------------------------
Imports Microsoft.VisualBasic
Imports System.Windows.Forms

Module Module1

Sub Main()
Dim ProcID As Integer
ProcID = Shell("c:\mydir\SYSAPP.EXE", AppWinStyle.NormalFocus)
AppActivate(ProcID)
SendKeys.SendWait("username")
End Sub
End Module