Calculate Processing Time for an acitivity

Imports System.Diagnostics

Sub GetProcessTime()

Dim myWatchAs New Stopwatch

myWatch.Start()

Process_database()

myWatch.Stop()

MsgBox("Total Time Taken for Database Operation := " & myWatch.ElapsedMilliseconds.ToString)


End Sub