1

ボタンをクリックするたびに、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

4

1 に答える 1

0

私はあなたが意味すると思います：

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

于 2012-06-01T19:22:02.350 に答える