Private Sub Komut0_Click()
On Error Resume Next
Static tiksay As Long
tiksay = tiksay + 1
If tiksay = 2 Then MsgBox "2. tıklamanız"
ElseIf tiksay = 3 Then MsgBox "3. tıklamanız"
ElseIf tiksay >= 4 Then MsgBox "Butonla alıp veremediğin nedir?"
End If
End Sub
Örnek kod: