システムwiki

VBA Onload複数のIFを

DiscusG 解決済 最終更新日:2021-06-14 06:20

こんにちは、フォームのオンロードのための次のコードを持っています:

プライベートサブフォーム名()
me.recordset.recordcount= 0であれば
Me.BtnStartAudit.visible= true


Me.BtnStartAudit.visible= false

の場合は終了 終了SUB

オンロードにもう1つの条件を追加したいと思います.

functionID= 4の場合、txtauditscoreを非表示にしますが、faxtidが4以外の場合はtxtauditscoreを表示しますが、txtproviderpを非表示にして、txtpractionerp

を隠す

事前にありがとうございました.

返信リスト(回答:1)

1 #
JasleS 2

finestidのフォーム上のフィールドですか?その場合は、ENDの後にこれを追加してください. me.functionid= 4
Me.txTauditScore.visible= false


me.txtauditscore.visible= true
me.txtproviderp.visible= false
me.txtpractitionRp.visible= false
終わり