[VB6] Contare i caratteri di una Caption

[RastaRego]

SALVE!!!!!!!

Scusate la mia ignoranza, ma vorrei sapere come è possibile contare i caratteri che sono presenti all'interno di una caption..
ES:

text1.caption = "XXX"

Vorrei che mi ritornasse il valore 3...

******************OPPURE (più semplice)****************************

Vorrei che tutte le volte che schiaccio un determinato button
mi si incrementasse un contatore!

Per voi dovrebbero essere cose di tutti i giorni...

GRAZIE MILLE!!!

[oregon]

Non ho capito ... ma forse se leggi nell'help l'uso della funzione

Len

risolvi ...

[MdE2005]

Ciao..se ho ben capito ti interesserebbe sapere costantemente il numero di caratteri presenti nella tua caption: per far questo fai così:

Private Sub Label1_Change()
Dim NumeroDiCaratteri As Currency
NumeroDiCaratteri = Len(Label1.Caption)
End Sub

La variabile NumerodiCaratteri contiene ciò precedentemente detto..

Per qualsiasi problema e/o chiarimento scrivi pure..ciao

[RastaRego]

Grazie MILLE!!!!!

[RastaRego]

Grazie MILLE!!!!!

[RastaRego]

EILA'

SCUSATE se sono Pedante ma...
se volessi fare una cosa del genere???

:
creo un pulsante, per esempio "cmd1", mi piacerebbe un sacco avere un contatore nella caption, in modo che tutte le volte che clicco su cmd1, il contatore mi si aggiorna, e quindi la sua caption...
Se x esempio ci clicco sopra 4 volte, vorrei che la sua caption diventasse prima 0, poi 1 , 2 , 3, e 4!

Can you help me???? Please!

[Boolean]

Private Sub Form_Load()
    Command1.Caption="0"
End Sub

Private Sub Command1_Click()
    Command1.Caption = CInt(Command1.Caption)+1
End Sub

Boolean

[Sypher]

sul click del bottone converti la caption in intero e fai più 1 :

Label1.Caption = Cint(Label1.Caption) + 1

inizializza la caption a 0

[RastaRego]

MITICI...

For I=1 to n
thanks!!!!
next

[RastaRego]

MITICI...

For I=1 to n
thanks!!!!
next