A way to calculate the time taken by a part of source code (very simple and rarely useful but... I was tired of writing these lines every time).
Dim CurrTimeFormat As String = DateTime.TimeFormat
DateTime.TimeFormat = "mm:ss:SSS"
Dim Now As Long = DateTime.Now