اجرای دو بار دستور Button5_Down پشت سر هم

[vahid_d_0101 31]

Sub Button5_Down
Log ("a")
End Sub

سلام بچه ها اگر دستور بالا را اجرا کنید و روی باتون 5 کلیک کنید دوبار حرف a داخل لوگ میاد و این برای برنامه من ایجاد  خطا میکنه 

دلیل این کار را کسی میدونه ؟

[پژمان نیکروان 6,055]

درسته این مشکل وجود داره.

باید با یه متغیر Boolean از تکرار جلوگیری کرد.

 

یه متغیر تعریف کنید

Sub Globals
	Dim test As Boolean
End Sub

کدتون هم به این صورت بنویسید:

Sub Button5_Down
	If test=False Then
		Log ("a")
	test=True
	Else
		test=False
	End If
End Sub

[alirezakazemizaroomi 437]

سلام

مشکل از یه جای دیگست لطفا کداتونو دقیق بررسی کنین یا بذارین اینجا بررسیش کنیم