** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Usar variable
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoUsar variable

 Responder Responder
Autor
Mensaje
JUGOCA Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 03/Diciembre/2015
Localización: Cartagena
Estado: Sin conexión
Puntos: 46
Enlace directo a este mensaje Tema: Usar variable
    Enviado: 31/Octubre/2017 a las 21:37
Tengo un formulario con 10 cuadros de texto con nombres 1,2,3, etc. También defino una variable A as integer. Tengo dos cuadros de texto MesEntrada y MesSalida numéricos. Lo que pretendo es que en función del  valor de diferencia me ponga si en el cuadro de texto cuyo número coincida con A. En el evento Después de actualizar del cuadro de texto MesSalida
dim a as integer
for a =mesentrada to messalida
me!a="si"
next
Es decir que si mesentrada =5 y mes salida=8 me ponga en los cuadros de texto me!5,me.6,me!7 y me!8 ="si"


Gracias a todos
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 11092
Enlace directo a este mensaje Enviado: 31/Octubre/2017 a las 22:39
Una forma es usar la colección Controls:
 
Dim A As Integer, MesEntrada As Integer, MesSalida As Integer

    MesEntrada = 5
    MesSalida = 8
    '
    For A = MesEntrada To MesSalida
        Me.Controls("Mes" & A) = "si"
    Next
Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
JUGOCA Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 03/Diciembre/2015
Localización: Cartagena
Estado: Sin conexión
Puntos: 46
Enlace directo a este mensaje Enviado: 01/Noviembre/2017 a las 00:31
Muchísimas gracias. Funciona perfecto
Gracias a todos
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable