چند بار کلیک روی دکمه

[mohammad1314]

سلام. میخواستم برنامه ای بنویسم که اگه یکبار روی دکمه کلیک شد ، label برابر 1 بشه . اگه دوبار کلیک شد ، label برابر a بشه . اگه سه بار کلیک شد ، label برابر b بشه واگه هم چهار بار کلیک شد ، label برابر c بشه.

[مرتضی تقدمی]

سلام
چهار پنج تا شرط با یک شمارندست دیگه. فکر نمی کنم غیر از این باشه.

[mohammad1314]

خوب اگه میشه روش برنامه رو برید.

[ASedJavad]

Private Sub Command1_Click()
Static a As Byte
Select Case a

Case 0
Label1 = "1"
Case 1
Label1 = "a"
Case 2
Label1 = "b"
Case 3
Label1 = "c"
End Select
a = a + 1
End Sub

[mohammad1314]

ممنون از راهنماییتون:لبخندساده:

[بهروز عباسی]

البته اینجور که دوستان میگن اگه دفعات کلیک افزایش پیدا کنه باید چند صفحه شرط بنویسیم

Private Sub Command1_Click()
Static a As Byte
Label1 = str(a)
a = a + 1
End Sub