Profiling in .NET


Kleiner Trick um rudimentäres Profiling .NET Anwendungen zu betreiben. Entweder die Klasse System.Diagnostics.Stopwatch verwenden oder TickCounts mit System.Environment.TickCount zählen:


Option Explicit On


Option Strict On


 


Public Class Test


 


    Public Shared Sub main()


 


        Dim Stoppuhr As New System.Diagnostics.Stopwatch


 


        Stoppuhr.Start()


        System.Threading.Thread.Sleep(2000)


        Stoppuhr.Stop()


 


        System.Console.WriteLine(“Seit Begin der Messung sind {0} Millisekunden vergangen.”, Stoppuhr.ElapsedMilliseconds.ToString)


 


        Dim TickCount As Long = System.Environment.TickCount


        Dim VergangeneZeit As Long


        System.Threading.Thread.Sleep(2000)


        VergangeneZeit = System.Environment.TickCount – TickCount


        System.Console.WriteLine(“Seit Begin der Messung sind {0} Millisekunden vergangen.”, VergangeneZeit.ToString)


 


    End Sub


 


End Class


In diesem Sinne… Schöne Grüße.


Daniel

Comments (0)