jj 18.05

app/DD-Record-Organiser/ModuleHelperMethods.vb

@@ -395,4 +395,22 @@
         Return Guid.NewGuid().ToString().GetHashCode().ToString("x")
     End Function
 
+    Public Class SW
+        Public label As String
+        Public stopwatch As Stopwatch
+
+        Public Sub New(label As String)
+            Me.label = label
+            stopwatch = New Stopwatch()
+            stopwatch.Start()
+        End Sub
+
+        Public Sub Done()
+            stopwatch.Stop()
+            Console.WriteLine("{0} took {1} milliseconds to complete", label, stopwatch.ElapsedMilliseconds)
+        End Sub
+
+
+    End Class
+
 End Module