کلیک اول و دوم روی یک دکمه [بایگانی]

rezapassword

جمعه 22 شهریور 1387, 14:34 عصر

سلام دوستان
لطفا کد این رو در اختیارم بگذارید :
اگر روی دکمه اول کلیک شد فلان کار رو بکن و اگر دوباره روی اون کلیک شد کار دیگه ای بکن
ممنون

r_zamani

جمعه 22 شهریور 1387, 14:53 عصر

میتونی یک متغیر از نوع boolean در نظر بگیری اول false باشه
تو رویداد کلیک بعد از انجام کارات اونو true کن و همیشه در اول این رویداد چک کن که مقدارش چیه

Dim flag As Boolean = False
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If flag Then 'یعنی دفعه دوم کلیکه
'کارایی که میخوای انجام بدی
flag = False
Else 'دفعه اول کلیکه
'کارایی که میخوای انجام بدی
flag = True
End If
End Sub
البته بهتره به جای این کلک از کلیک و دابل کلیک استفاده کنی
موفق باشی