Iniciar sesión
Crear cuenta
Crear cuentaCrear cuenta
Private Sub Command4_Click()
Dim formulario As Form
Set formulario = Label3.Caption
formulario.Command7.Value = True
End Sub
Dim formulario As Form
If Label3.Caption = "Form1" Then
formulario = new Form1()
End If
...
formulario.ExecuteButtonClick()
Dim formulario As IExecuteCommand
If Label3.Caption = "Form1" Then
formulario = new Form1()
End If
...
formulario.ExecuteButtonClick()
Select case ALGO
Case 1
Formabc.Botonabc_clickCase 2
Formxyz.Botonxyz_click..
..
..
End Select