|
▼マミ さん:
>▼クロ さん:
>>サブフォームに1レコード表示ですか?先頭のレコードの対象テキスト
>>ボックスが対象になるかと思いますがどうでしょうか?
>>
>>ちなみに当方のテストでは問題ないようです。
>
>はい。1レコードです。メインフォームとサブフォームではIDでリンク
>されており、メインフォームを開く時にフィルターをかけて対象の1レ
>コードに絞っています。ちなみにIf文で"あり"の場合にMsgboxを表示
>してみましたが、正常に表示されました。でも、ラベル.Visible=True
>は無視されてしまいます。
Private sub MainForm_Load()
If Forms!MainForm!SubForm.Form!ControlText.Value = "あり" then
Forms!MainForm!SubForm.Form!Label_1.Visible = True
Msgbox "ありの処理",vbokonly
else
Forms!MainForm!SubForm.Form!Label_1.Visible = False
end if
end sub
上記のように記述してみると、Msgboxは表示されます。エラーにもなら
ずに、フォームが開きます。でもLabel_1が表示されないのです。
|
|