Visual Basic - Uso de variables en Visual

Life is soft - evento anual de software empresarial
   
Vista:

Uso de variables en Visual

Publicado por Simon Monascal productosdigitales@hotmail.com (2 intervenciones) el 04/06/2015 01:44:58
Buenas noches,
Tengo muchos cuadros de texto en un formulario Access.
si el usuario selecciona, por ejemplo, los cuadros Tex t1 al Text10 tengo que actualizarlos con un color, el mismo color para todos.
Por ejemplo: Text1.BackColor = 642810, Text2.BackColor = 642810, etc
Hay alguna manera de hacer un while para ir generando los números 1, 2, 3,.....10 e ir actualizando cada cuadro con su color?
Saludos.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo

Uso de variables en Visual

Publicado por Andres Leonardo (702 intervenciones) el 04/06/2015 16:01:34
Podrias hacer una matriz de controles

donde no seria text1.text si no text(1).text

donde el 1 es el indice y tendras del uno al diez

Ahora si no queires hacer esto podrias buscar los controles del formulario

1
2
3
4
5
6
7
8
Dim controlesForm As Control
Dim valor
 
For Each controlesForm In Controls
    If (TypeOf controlesForm Is TextBox) And (Mid(controlesForm.Name, 1, 4) = "text") Then
      controlesForm..BackColor = 642810
    End If
Next

Espero te sirva de guia
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Uso de variables en Visual

Publicado por Simon Monascal (2 intervenciones) el 05/06/2015 16:05:56
Buenos días Andrés,
Excelente, esta ayuda me oriento para no generar un código descomunalmente grande, muchísimas gracias.
Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Imágen de perfil de Andres Leonardo

Uso de variables en Visual

Publicado por Andres Leonardo (702 intervenciones) el 05/06/2015 17:25:17
Que gusto que te haya servido

Saludos desde Ecuador.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar