访问VBA：在表单上打开设置标签

Question

我不知道怎么说这个，所以我只会谈谈它。一次打开多种表单。用户通过浏览表单的按钮在其中几个之间跳转。我试图让标签在表单中反弹时动态变化。以下代码适用于Click事件......

Private Sub Command56_Click()
    Label21.Caption = Nz(Forms("User_Activities").text14.Value)
    Label22.Caption = Nz(Forms("User_Activities").text16.Value)
    Label23.Caption = Nz(Forms("User_Activities").text18.Value)
    Label24.Caption = Nz(Forms("User_Activities").text20.Value)
    Label25.Caption = Nz(Forms("User_Activities").text22.Value)
    Label26.Caption = Nz(Forms("User_Activities").text24.Value)
    Label27.Caption = Nz(Forms("User_Activities").text26.Value)
    Label28.Caption = Nz(Forms("User_Activities").text28.Value)
    Label29.Caption = Nz(Forms("User_Activities").text30.Value)
    Label30.Caption = Nz(Forms("User_Activities").text32.Value)
End Sub

我试图找出使用什么而不是Click这里使它变得动态。我已经尝试初始化，调整大小和加载。这些都不起作用，因为表格当时已经打开。

Answer 1

我弄清楚了我的问题。有很多方法可以解决这个问题，但最简单的方法是使用Form_Activate()