可視の設定

質問

よろしくお願いします。

同じフォーム上に
チェックボックスAと
テキストボックスBと
テキストボックスCがあります。

チェックボックスにチェックがついたときだけ、
テキストボックスＢとＣを可視にしたくて、
普段は見えないようにしたいです。

どうしたらいいでしょうか？教えてください。

回答No.1

nanashan

チェックボックスがオンになったときとは
更新ご処理のの中に、Visibleを使ってみて下さいね。
コードを書いてみました。参考にしてみて下さいね。
チェックボックスをAとします。

Private Sub A_AfterUpdate()
Me.B.Visible = True
Me.C.Visible = True
End Sub

通常は、見えないようにします。
Private Sub Form_Load()
Me.B.Visible = False
Me.C.Visible = False
End Sub

補足

早々のご返事ありがとうございました。

ところで２点質問がありまして、
１つ目が、
チェックをはずしても可視の状態のままになってしまいましたということです。

２つ目がきちんと説明してなくて申し訳ないのですが、
このフォームが実はサブフォームで、数レコード表示されています。
それぞれのレコードごとにチェックボックスAおよびテキストボックスB、Cがあります。
そのため、最初のレコードでB、Cが可視になると、次のレコードのAにチェックがなくてもB,Cが可視になってしまうのです。

詳しい解決方法がありましたら、追加、教えてくださると助かります。