CONTAR CLIQUES EM BOTAO
Pessoal...
Como faço para contar quantas vezes um Botão é pressionado ???
EX:
A cada clique dado no Botão, seja mostrado em uma Label a quantidade de vezes que ele foi pressionado.
Deu para entender ???
Como faço para contar quantas vezes um Botão é pressionado ???
EX:
A cada clique dado no Botão, seja mostrado em uma Label a quantidade de vezes que ele foi pressionado.
Deu para entender ???

Cria uma variavel, e a cada clic, tu vai incrementando ela em mais um...
é Simples cara!
coloca um botão e um label e esse código:
Option Explicit
Dim Contador As Integer
Private Sub Command1_Click()
Contador = Contador + 1
Label1.Caption = Contador
End Sub
é Simples cara!
coloca um botão e um label e esse código:
Option Explicit
Dim Contador As Integer
Private Sub Command1_Click()
Contador = Contador + 1
Label1.Caption = Contador
End Sub
Não funcionou cara
!

O que não funcionou??? Mostre o erro para nó, ou como você tentou fazer!!!
Me parece que o exemplo do PDUARTES9 está correto.
Crie uma variável, e sempre que clicar no botão some mais 1 nessa variável.
Me parece que o exemplo do PDUARTES9 está correto.
Crie uma variável, e sempre que clicar no botão some mais 1 nessa variável.

o Caption da Label tem de iniciar com o valor de [Ô]0[Ô] (zero)...
fiz assim para dá certo:
Private Sub cmd_Cont_Click()
Dim vCon As Integer
If lb1.Caption = Empty Then
lb1.Caption = 0
Else
vCon = lb1.Caption + 1
lb1.Caption = vCon
End If
End Sub
Valeu !!!

Tópico encerrado , respostas não são mais permitidas