Access 97 creando objeto desde VB

En el acceso 97, ¿es posible agregar algún elemento al formulario usando VB, como algún botón de comando cuyo título sea "Hola Palabra" y cuya altura es 300 y ancho 700?

preguntado el 27 de agosto de 11 a las 17:08

Sí, por supuesto que es posible. ¿Cuál es tu pregunta REAL? ¿Qué has probado y qué no te está funcionando? -

Dependiendo de lo que esté tratando de lograr, podría ser más fácil crear un botón oculto y luego usar VBA para mostrarlo / ocultarlo en tiempo de ejecución. Me.CommandButton.Visible = Verdadero -

1 Respuestas

Intente lo siguiente:

Function AddCommandButtonFunction()
Dim btn As CommandButton

DoCmd.OpenForm "TestForm", acDesign

On Error Resume Next
DeleteControl "TestForm", "NewButton"

On Error GoTo lberr
Set btn = CreateControl("TestForm", acCommandButton)

btn.Name = "NewButton"
btn.Caption = "Hello World!"
btn.Top = 500 'twips. 1 twip = 1/1440 in
btn.Left = 500 'twips
btn.Width = 2000 'twips
btn.Height = 500 'twips

DoCmd.Close acForm, "TestForm", acSaveYes
DoCmd.OpenForm "TestForm", acNormal

Exit Function

lberr:
    MsgBox Err.Description
End Function

Tenga en cuenta que agregar / eliminar el control (mediante programación) es , permitido en modo Diseño

Respondido 28 ago 11, 11:08

No es la respuesta que estás buscando? Examinar otras preguntas etiquetadas or haz tu propia pregunta.