ms-access - MS ACcess 使文本框在按钮单击时可见

Question

在每次单击按钮时，我都希望能够使 4 个文本框和 4 个标签“可见”。我不确定如何使用 VBA 代码执行此操作。

到目前为止，这是我尝试过的：没有产生错误，但我不知道如何从这里开始。

Private Sub Command36_Click()

Static Counter As Integer
Dim Name As String
Dim Name2 As String
Dim Count As Integer

Counter = Counter + 1

Name = "Label" & Counter
Name2 = "Text" & Counter
Command36.Caption = Name & Name2

For Count = 1 To Count = Counter

Microsoft Access 表单、VBS

Answer 1

我想你的意思是：

Private Sub Command36_Click()
Dim Name As String
Dim Name2 As String
Dim Count As Integer


   For Count = 1 To 4
      Name = "Label" & Counter
      Name2 = "Text" & Counter
      Command36.Caption = Name & Name2
   Next

End Sub

我不太明白上面的意思是什么。

这可能更有用，如果，正如你所说，你想让一些东西可见：

   For Count = 1 To 4
      Name1 = "Label" & Counter
      Name2 = "Text" & Counter
      Me(Name1).Visible = True
      Me(Name2).Visible = True
   Next

帮自己一个忙，并确保为控件提供“真实”名称，而不是 Command36，而是类似cmdShowLabel