caselle di testo (VB6)

[stee]

Ciao a tutti!

Avrei una domanda... Ho una matrice di textbox chiamati valore(n).
Vorrei che un timer controllasse tutti questi textbox e nel caso anche solo uno di questi risultasse vuoto mi disabiliti un pulsante di comando.
Che codice devo inserire nell'evento "timer" del timer?

Grazie mille!!
Stee

[xegallo]

dim i as integer

for i = 0 to valore.ubound
   if trim$(valore(i).text) = "" then
       commandbutton.enabled = false
       exit for
   end if
next i

[stee]

Grazie mille x l'aiuto, molto gentile!
Però c'è un problema, non funziona
Io non sono molto pratico, però inserendo il codice che mi hai dato nell'evento timer non succede nulla, il bottone rimane attivo (e il timer è imposto enabled=true, interval=500).......
Ecco il codice che ho inserito nella routine:

Private Sub Timer1_Timer()
Dim i As Integer

For i = 0 To VALORI.ubound
If Trim$(VALORI(i).Text) = "" Then
OKButton.Enabled = False
Exit For
End If
Next i

End Sub

Dove sbaglio?
Grazie mille!
Ste

[stee]

Come non detto, risolto il problema, il tuo codice era giusto, ero io che sbagliavo!!
Grazie ancora!
Stefano

[ciro78]

Originariamente inviato da xegallo

dim i as integer

for i = 0 to valore.ubound
   if trim$(valore(i).text) = "" then
       commandbutton.enabled = false
       exit for
   end if
next i

sinceramente non capisco una cosa.perchè usi la funzione trim.per me non sarebbe necessaria ma siccome ne sai + di me...sarei curisoso di sapere