[VB6] Individuare controlli

[Stibbert]

Ho scritto così:

For Each ctrl In Controls
   If (Textbox) Then
   Var = (Textbox).text
   End if
   If (Checkbox) Then
   Var2 = (Checkbox).Value
   End if
Next

Il mio problema consiste nel riuscire a individuare che tipo di controllo è quello analizzato
Come posso fare? Grazie

[Brainjar]

Puoi utilizzare la 'funzione' TypeOf :

Dim Var As String
Dim Var2 As Integer

For Each ctrl In Controls
   If TypeOf ctrl Is TextBox Then
       Var = ctrl.Text
   End If
   If TypeOf ctrl Is CheckBox Then
   Var2 = ctrl.Value
   End If
Next

[oregon]

E' ctrl che usi nel ciclo ... userai

ctrl.Text o ctrl.Value

secondo i casi ...

[Stibbert]

Grazie Oregon

[oregon]

Originariamente inviato da Stibbert
Grazie Oregon

Di nulla ... anche se Brainjar e' stato piu' preciso ...

[Stibbert]

Scusa Brainjar, non avevo letto il tuo messaggio.
Mi piace questo codice, lo voglio usare.

[Stibbert]

E' da poco che sono utente, e faccio ancora molta confusione..

[Brainjar]

[OFF_TOPIC_MODE]
Tranquilli.
E' bello quando in un forum si nota questo spirito 'collaborativo'.
[/OFF_TOPIC_MODE]