Acceder a las propiedades de un control

30/06/2005 - 18:00 por daniel | Informe spam
Hola quiza me este liando mas de la cuenta, os cuento,

yo tengo una serie de controles en un formulario, algunos de ellos empiezan
por el mismo nombre "opt_"

Yo quiero ir viendo la propiedad checked de esos opt, entonces he montado lo
siguiente:

For i = 0 To paso_3.Controls.Count - 1
If Mid(paso_3.Controls(i).Name, 1, 4) = "opt_" Then

'aqui no se que poner##

Exit For
End If
Next

Yo quiero ir viendo la propiedad checked para saber si es true o false pero
no se como acceder a ella, igual no lo hago del todo bien.

Gracias

Preguntas similare

Leer las respuestas

#1 Carlos Gómez
30/06/2005 - 18:26 | Informe spam
Supongo que paso_3 es el formulario.
Tienes una forma más sencilla de recorrer controles:

dim miControl as Control

For Each miControl in Me.Controls
If Mid(miControl.Name,1,4)="opt_" Then
'Supongo que el control que buscas es un CheckBox
dim miCheckBox as CheckBox
miCheckBox=DirectCast(miControl,CheckBox)
if miCheckBox.Checked then
'Hago unas cosas
else
'Hago otras cosas
End If
End If
Next

daniel wrote:

Hola quiza me este liando mas de la cuenta, os cuento,

yo tengo una serie de controles en un formulario, algunos de ellos
empiezan por el mismo nombre "opt_"

Yo quiero ir viendo la propiedad checked de esos opt, entonces he montado
lo siguiente:

For i = 0 To paso_3.Controls.Count - 1
If Mid(paso_3.Controls(i).Name, 1, 4) = "opt_" Then

'aqui no se que poner##

Exit For
End If
Next

Yo quiero ir viendo la propiedad checked para saber si es true o false
pero no se como acceder a ella, igual no lo hago del todo bien.

Gracias
Respuesta Responder a este mensaje
#2 daniel
30/06/2005 - 18:44 | Informe spam
Gracias Carlos, supones muy bien.

Todo correcto gracias de nuevo

"Carlos Gómez" escribió en el mensaje
news:
Supongo que paso_3 es el formulario.
Tienes una forma más sencilla de recorrer controles:

dim miControl as Control

For Each miControl in Me.Controls
If Mid(miControl.Name,1,4)="opt_" Then
'Supongo que el control que buscas es un CheckBox
dim miCheckBox as CheckBox
miCheckBox=DirectCast(miControl,CheckBox)
if miCheckBox.Checked then
'Hago unas cosas
else
'Hago otras cosas
End If
End If
Next

daniel wrote:

Hola quiza me este liando mas de la cuenta, os cuento,

yo tengo una serie de controles en un formulario, algunos de ellos
empiezan por el mismo nombre "opt_"

Yo quiero ir viendo la propiedad checked de esos opt, entonces he montado
lo siguiente:

For i = 0 To paso_3.Controls.Count - 1
If Mid(paso_3.Controls(i).Name, 1, 4) = "opt_" Then

'aqui no se que poner##

Exit For
End If
Next

Yo quiero ir viendo la propiedad checked para saber si es true o false
pero no se como acceder a ella, igual no lo hago del todo bien.

Gracias



email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida