Public Shared Function ProcessBatchFile() As Integer
       'Create a variable to hold the value you wish
       'to return to your calling method
        Dim batchSuccessful As Integer
        'Create a new Process(), I just happen
       'to name this "YourName"
       Dim batchExecute As New Process()

        'This is a method that you can use to set
        'properties for your new Process()
         Dim batchExecuteInfo As New ProcessStartInfo()

       'Tell the program to not use the built-in Shell provided
       'with the OS, wew ant to start it ourselved
       batchExecuteInfo.UseShellExecute = False

       'Tell the process to not open a Console window
       batchExecuteInfo.CreateNoWindow = True

        'Set your process info here
         batchExecute.StartInfo = batchExecuteInfo
        'Start your Process(), this will start the
        'command line and send your command
        batchExecute.Start("Path to your batch file here")

        'Set the period of time to wait for the associated
        'process to exit, and blocks the current thread
        'until the time has elapsed or the
        'process has exited
        batchExecute.WaitForExit(15000)

        'Create a variable and assign it the value
        'of your processes exit code
        Dim Exit As Integer = batchExecute.ExitCode

        'Check if the process has completed
        'and return a status of 0 (succeeded). If not
        'then we want to kill the process
       If Exit > 0 And Not batchExecute.HasExited Then
            'Here you can assign a value to a variable
            'to return to your calling method
            batchSuccessful = 1
            batchExecute.Kill
       Else
              'Do something here and
               'assign your successful variable a 0
               batchSuccessful = 0
       End If
       'Return the value (1 or 0) to
       'your calling method
       Return batchSuccessful
End Function