VBA Access：在 2010 Access 表单中创建一个新按钮

Question

我正在尝试在 Access 2010 窗体上创建一个新按钮。如果我单击一个按钮以在窗体上创建一个新按钮，但如果窗体视图与设计不同，我将无法创建该按钮视图（错误 6062：您必须在设计或布局视图中才能创建或删除控件）。如何使用 VBA 代码创建按钮？谢谢

  Private Sub Command2_Click()
     Dim boton As CommandButton

     Set boton = CreateControl(Me.Name, acCommandButton, acFooter)
        With newButton
            .Visible = True
            .Enabled = True
            .Caption = "prueba"
        End With
  End Sub

Answer 1

有一种更简单的方法可以完成您想要的。您可以在窗体上创建按钮属性 sheet 添加 make Visible = False。那么你的代码就是：

Private Sub Command2_Click()
Me.Command3.Visible = True
End Sub

然后当您单击该按钮时，它会使该按钮出现在窗体上。你想通过创建命令按钮来完成什么？这种方法有什么不足的原因吗？

VBA Access：在 2010 Access 表单中创建一个新按钮

VBA Access: Create a new button in a 2010 Access form

ms-access

vba