ری ست کردن تایمر با حرکت موس

[mohammadsaleh]

سلام د وستان
نحوه ری ست کردن تایمر با حرکت دادن موس چگونه است
البته من تایمر اینتروال را در رویداد مربوطه ابتدا به صفر و بعد به عدد مورد نظر تغییر دادم
ولی نتیجه ای نگرفتم
me.timerinterval=0
me.timerinterval=60000

[padide55]

نمونه لطفا
و منظورتون متوقف کردن تایم اینتروال و دوباره شروع
در رویداد ماس اور
یک تکست باکس درست کنید

سپس شرط بگذارید




if text1=0 then
me.timerinterval=0
me.text1=1
else
me.timerinterval=6000
me.text1=0
endif

[mohammadsaleh]

تشکر. بله منظورم همین بود


Private Sub Detail_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Text1 = 0 Then
Me.TimerInterval = 0
Me.Text1 = 1
Else
Me.TimerInterval = 6000
Me.Text1 = 0
End If
End Sub