Calculate Processing Time in any Activity

Imports System.Diagnostics

Private Sub GetProcessTime()
Dim myWatchAs New Stopwatch
myWatch.Start()
Process_database()
myWatch.Stop()
MsgBox("Total Time Taken for Database Operation :

= " & myWatch.ElapsedMilliseconds.ToString)
End Sub