| 投稿日 | ： 2005/04/06(Wed) 22:54 |
| 投稿者 | ： 花ちゃん |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^3: Form上でMsgBoxを出した時の画面のチラツキ |
> Formのサイズを大きくした方が分かりやすいです。
なるほど、閉じた後にちらつくのですね
下記ではどうでしょう
Private Sub Command1_Click()
Dim Ret As Integer
Ret = CreateObject("WScript.Shell").Popup _
("このメッセージボックスは３秒後自動的に閉じます。", 3, _
"自動的に閉じる", vbYesNo)
Debug.Print Ret
End Sub
閉じます。", , _ のように秒数を指定いなければVBのMsgBox と同様に使えます。
又は、フォームを使って代用する。
Form2.Show 1, Me