[VB6] Ciclo For Each per disabilitare pulsanti

[ranza!!!123]

devo far si ke tutti i pulsanti di un form diventino enabled=false

For Each CommandButton In Me
 CommandButton.Enabled = False 
Next CommandButton

perchè non funziona così?la cosa strana ke lo stesso codice messo in un altro progetto funziona,in quello dove mi serve no...
mi da l'errore su commandButton dicendo:variabile non definita

qualke delucidazione?

[pierabo]

Ciao, normalmente uso la funzione così:

    'CommandButton non è un tasto di comando
    Dim Bottone As CommandButton
    'Tasto, nell'esempio, è un tasto di comando
    'funziona soltanto se indicizzato: Tasto(0), Tasto(2), ecc.
    For Each Bottone In Tasto
        Bottone.enabled = False
    Next

[ranza!!!123]

non mi funziona...si comporta come quando uso la mia

[mgmg]

Io ho provato il tuo codice e funziona correttamente disabilitando tutti i command button presenti nel form.

Se vuoi puoi provare questo:

   Dim ctl As Control
    For Each ctl In Me.Controls
    If TypeOf ctl Is CommandButton Then _
        ctl.Enabled = False
    Next ctl

Ciao

[ranza!!!123]

anke a me il mio codice funziona su un altro progetto!
a questo punto mi viene da pensare ke abbia toccato qualke proprietà o qualcos'altro...xkè nn può essere ke lo stesso codice sullo stesso pc funziona in un progetto si e in uno no!