Private Declare Function ShellExecute Lib "shell32.dll" Alias _
      "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, ByVal _
      lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As _
      String, ByVal nShowCmd As Long) As Long
    Private Declare Function GetDesktopWindow Lib "user32" () As Long
 
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles MyBase.Load
        Call ShellExecute(GetDesktopWindow(), "open", "c:\test.txt", "", "", 1)
 
    End Sub