Visual Basic 6 - incrementare una variabile al clicco

Sarò preso in giro per sempre per questa domanda questo è l'estratto del codice di un giochino(ino ino) che sto facendo:

Private Sub sorriso_Click()
Dim cont As Integer 'variabile
cont = cont + 1 'che quando clicco sull'immagine con la faccina si dovrebbe
'incrementare di 1 ogni volta
Label1 = "Punti:" & cont ' e poi riportare il risultato sul label1
End Sub

Ora la questione è questa: la variabile mi si incrementa di +1 uno, ma solo una volta: sicuramente il problema sarà in quel cont = cont +1
Come potrei fare per fargli aggiungere uno ai punti ogni volta che clicco?
Non vi chiedo il codice fatto ma solo qualche consiglio.
Grazie!

Ciao,
devi rendere Pubblica la variabile, altrimenti ogni volta che fai Click la variabile si azzera:

Option Explicit
Dim cont As Integer
Private Sub sorriso_Click()
    cont = cont + 1
    Label1.Caption = "Punti:" & Space(1) & cont
End Sub

Più che renderla pubblica (cosa che nel tuo caso non serve e che cmq Louis non ha fatto), devi dichiararla al di fuori dell'evento click del pulsante (come suggerito da Louis).

Sì Alfonso hai ragione non sono stato chiaro; come hai intuito volevo dire che anziché dichiarare la variabile nella routine, questa andava dichiarata nella sezione Dichiarazioni del modulo della form; in tal modo la variabile é disponibile in tutte le routine del modulo stesso ed inoltre non perde il suo contenuto perché non viene riposizionata ogni qual volta si fa Click sul button.