2009-03-21 6 views
3

私はMS Access 2003 SP3で小さなフォームを作成しようとしていますが、他の人が作成した関数にはmsgboxがあります。私はフォームを実行している間、msgboxを無効にしたいと思います。 msgboxを無効にすることはAccessで可能ですか?アクセス時にmsgboxを無効にする

+0

機能を投稿してください。 – Fionnuala

答えて

3

私はmsgboxというフィクションを作成しました。その仕事のようです。みんなあなたの助けをありがとう。

Public Function MsgBox(Prompt, Optional Buttons As VbMsgBoxStyle = vbOKOnly, Optional Title, Optional HelpFile, Optional Context) As VbMsgBoxResult 

If myProcedureisRunning then 
    VBA.MsgBox Prompt 
else 
    debug.print prompt 
endif 
End Function 
0

CTRL-Fを実行してMSGBOXを検索してコメントします。私はそれがあなたがそれを行うことができる唯一の方法だと思います。

0

Alt + F11キーを押してVisual Basic IDEを開き、Ctrl + Fキーを押して検索します。検索に「

msgbox
」と入力し、「置換」を選択して「置換」ボックスに「
'msgbox
」と入力します(アポストロフィに注意してください)。これにより、プロジェクト内のすべてのmsgboxステートメントがコメント化されます。

+0

これはmsgbox( "hello"&_ "world")またはmsg = msgbox( "hello world"、vbyesno)を必要とするコードの複数の行に書かれたメッセージボックスでは機能しません。あなたが検索するときにはワイドカードを使用する必要があります。 – skatun

2

実際にこれらのメッセージボックスがVBAコードから生成されている場合は、コメントアウトしてください。ただし、レコードを挿入または更新するときにメッセージボックスなどのAccessが生成された場合は、それらを抑制するために、コマンドDoCmd.SetWarnings Falseを使用する必要があります。必要なときにのみ警告をオフにしてから、再度オンにしてください。そうしないと、「デザインモード」であっても、Accessのすべてのメッセージボックスはオフになります。

+1

警告を無効にすることはひどいアドバイスです。 –

+3

確かに、もしあなたがそのような単純な見方から見るならば。あなたはAccessで働いたことがありますか? 「N行を更新しますか?」というように、Accessアプリケーションの警告をオフにすることができます。ポップアップは表示されません。その後、それらを再びオンにすることができます。ひどいアドバイスではありません。 – HardCode

関連する問題