طريقة انشاء تايمر (Timer) من خلال الكود بدون الحاجة الى أي آداة (VB.net)

أولاً اكتب هذا الــ Function 

  Private Sub timerTicks() Handles TTimer.Tick

    

      msgbox "ok"

 End Sub

ثانياً : أكتب هذا الـــ Function داخل الفورم 

Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load

        TTimer = New System.Windows.Forms.Timer

        TTimer.Interval = 7000

        TTimer.Enabled = True

        TTimer.Start()

    End Sub

فبعد كتابة هذا الكود سيتم اظهار المسج كل 7 ثواني وتستطيع تغير هذه المدة من  TTimer.Interval = 7000 

شكرا لمتابعتكم : )