[silverlight]

طالما تريد تحديد مدة زمنية لشئ معين سواء فترة تشغيل برنامج او زمن تنفيذ كود معين الأفضل لك ان تستخدم StopWatch Class
وقي حالتك هنا تبدا StopWach عند بداية البرنامج ثم تقوم بإيقافه حين تريد و ليكن عند اغلاق الفورم مثلا
,وعلي ما اتذكر StopWatch كلاس به خاصية اسمها Elapsed  وهي عبارة عن TimeSpan التي ممكن من خلالها حساب المدة الزمنية

الكود التالي سوف يعطيك فكرة عن الاستخدام

PHP كود :

Dim sw As New Stopwatch()
sw.Start()
' do somthing
sw.Stop()

Dim ts As TimeSpan = sw.Elapsed
Dim result As String = String.Format("{0:00}:{1:00}:{2:00}.{3:00}", ts.Hours, ts.Minutes, ts.Seconds, ts.Milliseconds / 10) 


حل أخر و هنا يمكن الاستغناء عن التايمر و stopWatch أيضا

PHP كود :

Public Class Form1

    Private startData As DateTime = Nothing
    Private endDate As DateTime = Nothing

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        startData = DateTime.Now

    End Sub

    Private Sub Form1_FormClosing(sender As Object, e As FormClosingEventArgs) Handles MyBase.FormClosing
        endDate = DateTime.Now
        Dim ts As TimeSpan = endDate - startData
        Dim result As String = String.Format("{0:00}:{1:00}:{2:00}.{3:00}", ts.Hours, ts.Minutes, ts.Seconds, ts.Milliseconds / 10)
        MessageBox.Show(result)
    End Sub
End Class