MSアクセス2003-メッセージボックスたいのですが答えは"ok"を通じて自動的にコード

StackOverflow https://stackoverflow.com/questions/2479240

質問

なのでカップルでお届質問

場合を含みますこの一部のイベント:

MsgBox " ", vbOkOnly, "This little message box"

ということでそのコードで、']にチェックを入れて、[ok]ボタンを押します。その基本的なメッセージboox自動的にポップアップ、そして自動的にできます。

いそのかが知りたいぜんたいメッセージボックスして.....

どのものだけを知りたい場合で行うことができます、そのコマンド

bをしているのか教えてください基本的な形状(形状オブジェクト)が可視の場合のメッセージボックスが表示されます。がなく、メッセージボックスがありません一時の混乱のコードの空き時間にボタンをクリックしておき、その者かイメージオブジェクトが可視化されたときには効するものです。

私は本当に必要のないメッセージボックスに温かく乱を示すオブジェクト。

よろしく!

役に立ちましたか?

解決

A MsgBox はモーダルです。がモダリティに関する設定

  • ApplicationModal
  • SystemModal

ここでは、Msgboxがポップアップされる現在のアプリケーションコードのままボタンをクリックし、メッセージボックス。

のこのころは自分でデザインしたメッセージボックスを使用します。できるこのポップされた状態を保つことができることになりそできる"をクリックの"ボタンをしたいです。

したい場合は遅れてしまうので、勝利するためのAPI睡眠

Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Private Sub ApiSleep(SleepMilliseconds as Long)
    Sleep SleepMilliseconds 
End Sub

他のヒント

私は、これはしばらく前に頼まれた知っているが、溶液Iの使用は、この次のとおりです。

CreateObject("WScript.Shell").PopUp "Save Successful!", 1, "Save"
この作品は、メッセージボックスでどのように

は、通常1しかしそれも何もせずに近い自動メッセージボックスをすることができますを意味し、独自のシステムタイマます。

を持っているのと同じように表示されています

あなたはそれが自動的に閉じる前にのために表示したい秒数を数1を意味します。

私は何かが保存されているが、実際には「OK」をクリックしてユーザーを必要としないことをその耐用通知などの手順の保存のためにこれを使用しています。

とにかくそれが答えの私の2ペニーの価値があります。これはあまりにも他の誰かに役立ちます願っています!

Sendkeys "~",false

(それがフォーカスを持っていると仮定して)メッセージボックスを閉じる必要があり

私はあなたがペイントイベントを探している、またはあなたが実際に何をしたいかを達成するためにかかわらず、フォームの更新を強制していると思います!

編集:ええ、いまいましいああそれはモーダルコードが中断されていますので...ああD'!示唆したように、自分自身を記述するか、あなたがそれを行うには別のスレッドで何かを投げる必要があるだろう、と私はMS Accessでのマルチスレッド化を行う方法が分からない!

第二編集:あなたは、レイアウトを描く再開するために一時停止するApplication.Echo FalseApplication.Echo Trueで見たことがありますか?

ライセンス: CC-BY-SA帰属
所属していません StackOverflow
scroll top