منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

عليك ب تعريف متغير ب اي إسم مناسب لهذا التايمر
ثم تقوم بضبط صفات هذا التايمر ...ثم تستخدم AddHandler لإضافة التايمر الي الكونترول
ثم بالنهاية تقوم بالتخلص من هذا التايمر من خلال Dispose

و الكود التالي سيعطيك فكرة عن الأمر من خلال استخدام الوراثة من الباتون أو يمكنك ان تستخدم أي كونترول أخر
عموما الطريقة واحدة دائما لا تتعير في كيفية إضافة التايمر لأي كونترول او فورم

و طبعا يمكنك تشغيل التايمر بالشكل الذي تريده عن طريق استخدام الكود طبقا لمتطلبات الكود

(16-06-14, 01:54 AM)silverlight كتب : [ -> ]عليك ب تعريف متغير ب اي إسم مناسب لهذا التايمر
ثم تقوم بضبط صفات هذا التايمر ...ثم تستخدم AddHandler لإضافة التايمر الي الكونترول
ثم بالنهاية تقوم بالتخلص من هذا التايمر من خلال Dispose

و الكود التالي سيعطيك فكرة عن الأمر من خلال استخدام الوراثة من الباتون أو يمكنك ان تستخدم أي كونترول أخر
عموما الطريقة واحدة دائما لا تتعير في كيفية إضافة التايمر لأي كونترول او فورم

و طبعا يمكنك تشغيل التايمر بالشكل الذي تريده عن طريق استخدام الكود طبقا لمتطلبات الكود

كود :

Public Class MyButton

    Inherits Button

    Private _timer As Timer
    Private _enableTimer As Boolean = False

    Public Sub New()
        Me._timer = New Timer
        Me._timer.Enabled = _enableTimer
        Me._timer.Interval = 100
        AddHandler Me._timer.Tick, New EventHandler(AddressOf Me.Timer_Tick)
    End Sub


    Private Sub Timer_Tick(ByVal sender As Object, ByVal e As EventArgs)
        ' do something
    End Sub

    ' dispose Timer
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)

        If disposing Then
            Me._timer.Enabled = False
            Me._timer.Stop()
        End If

        MyBase.Dispose(disposing)
    End Sub

End Class

شكرا اخى