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

Tan sencillo como abrir formulario

Estas en el tema de Tan sencillo como abrir formulario en el foro de Programación General en Foros del Web. Desde VBA de access para abrir un formulario puedo poner como variable el nombre del formulario a abrir. docmd.openform "NombreForma" o Variable="NombreForma" docmd.openform Variable Ahora ...
  #1 (permalink)  
Antiguo 22/09/2004, 12:27
 
Fecha de Ingreso: junio-2004
Mensajes: 6
Antigüedad: 20 años, 5 meses
Puntos: 0
Tan sencillo como abrir formulario

Desde VBA de access para abrir un formulario puedo poner como variable el nombre del formulario a abrir.

docmd.openform "NombreForma"
o
Variable="NombreForma"
docmd.openform Variable

Ahora necesito emular esto a VB pero creo que la unica forma de abrirlo es:
NombreForma.show
cosa que no me sirve ya que necesito forzosamente que el nombre del formulario sea variable.
Espero haberme explicado bien y ojala me puedan hechar la mano.

Saludos
  #2 (permalink)  
Antiguo 22/09/2004, 13:00
Avatar de jrp01  
Fecha de Ingreso: mayo-2004
Ubicación: México
Mensajes: 2.702
Antigüedad: 20 años, 6 meses
Puntos: 0
Esto te puede servir declaras esto en un modulo:
Global forma As Form

creas 3 formas en la primera colocas un textbox y un boton en el boton pones esto:
Private Sub Command1_Click()
Dim bandera As Integer
Select Case Text1.Text
Case "Form2":
Set forma = Form2
bandera = 1
Case "Form3":
Set forma = Form3
bandera = 1
Case Else:
MsgBox "Forma no encontrada"
badera = 0
End Select
If bandera = 1 Then forma.Show
End Sub

Ya solo pones en el text la forma que quieres abrir.

Espero que te sirva
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 14:42.