Foros del Web » Programación para mayores de 30 ;) » Bases de Datos General »

Vbasic en Access

Estas en el tema de Vbasic en Access en el foro de Bases de Datos General en Foros del Web. Hola a todos, haber si me podeis ayudar. Estoy programando un aplicacion en Access usando VBasic. Par referise en access a un boton de un ...
  #1 (permalink)  
Antiguo 28/11/2004, 11:38
 
Fecha de Ingreso: noviembre-2002
Mensajes: 198
Antigüedad: 22 años
Puntos: 0
Vbasic en Access

Hola a todos, haber si me podeis ayudar.

Estoy programando un aplicacion en Access usando VBasic. Par referise en access a un boton de un formulario debemos ponerle el nombre de dicho boton. Por ejemplo tengo tres botones llamados L1, L2 y L3 para referime a ellos escribo

[L1].enable = false
[L2].enable = true

por ejemplo.

Bueno pues yo tengo un bucle desde i=1 haste i=3

y mi pregunta es hay alguna manera de referime al boton Li , es decir que el nombre varie en funcion del valor que toma la i.

Muchas gracias.
  #2 (permalink)  
Antiguo 29/11/2004, 09:21
 
Fecha de Ingreso: noviembre-2004
Mensajes: 1
Antigüedad: 20 años
Puntos: 0
Respuesta

Hola Dixie lo primero que tienes que hacer es nombrar los tres botones igual (por ejemplo btnuno), al hacerlo te pedira si quieres crear una matriz de controles presiona aceptar y eso es todo, para trabajar con los botones solo tienes que hacer lo siguiente:

Private Sub btnuno_Click(Index As Integer)
If Index = 0 Then
MsgBox btnuno(0).Caption
End If
If Index = 1 Then
MsgBox btnuno(1).Caption
End If
If Index = 2 Then
MsgBox btnuno(2).Caption
End If
End Sub

o lo que quieres hacer con el for:

For i = 0 To 2
MsgBox btnuno(i).Caption
Next

espero que te sirva.


DARKJOSS

"Lo dificil lo hago rápido, con lo imposible me trado un poco más"
  #3 (permalink)  
Antiguo 30/11/2004, 06:41
 
Fecha de Ingreso: noviembre-2002
Mensajes: 198
Antigüedad: 22 años
Puntos: 0
Gracias por responder, pero me temo que no me funciona.
Yo estoy usando el Access '97.
Acabo de probar poner 3 botones en 1 formulario y darle el mismo nombre pero no lo acepta.
He mirado en la ayuda por si venía algo de matriz de controles y no viene nada.

En fin , seguiré intentando otros métodos, gracias.
  #4 (permalink)  
Antiguo 01/12/2004, 09:26
 
Fecha de Ingreso: abril-2003
Ubicación: Madrid
Mensajes: 707
Antigüedad: 21 años, 7 meses
Puntos: 0
Para hacerlo debes llamar a los botones de la siguiente manera:

dim Ias integer ' por ejemplo

For I = 1 to 3
me!("L" & I).Enabled = true
Next

mas o menos algo así, este código es menos eficiente que el que tenías en un principio, pero a veces no queda màs remedio

Un saludo
  #5 (permalink)  
Antiguo 01/12/2004, 12:06
 
Fecha de Ingreso: noviembre-2002
Mensajes: 198
Antigüedad: 22 años
Puntos: 0
Muchisimas gracias, solucionado!!!!
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 23:34.