フォームが裏に隠れるのはなぜ？ (ID:88543)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 メニュー画面を開いて、コマンドボタンを押すと、処理が実行され、 処理中です。という文字を表示するフォームを開きます。 その後処理が終わると文字を表示したフォームを閉じます。 このとき、メニュー画面が他のアプリケーションの１つ裏に隠れてしまう現象が おきるんですがなぜでしょうか。 その原因がわからいのでご教授お願いします。 ちなみにソースは 以下のようになります。 ★mainフォームでメッセージを表示する処理を呼びます。 Call pb_ShoriMessage("処理中", KINO_NAME, True) ★標準モジュールにてメッセージの処理を行います Public Function pb_ShoriMessage(losMesWindow As String, losMesCaption As String, lobOpenClose As Boolean) If lobOpenClose = True Then '処理中メッセージを表示 Screen.MousePointer = vbHourglass pb_MessageWindow losMesWindow frmMessage.Caption = losMesCaption frmMessage.Show DoEvents Else '処理中メッセージを非表示 Unload frmMessage Screen.MousePointer = vbDefault DoEvents End If ' 戻り値をTrueに設定 pb_ShoriMessage = True End Function ★そして他の標準モジュールにて非表示にする処理を呼びます。 Call pb_ShoriMessage("", KINO_NAME, False) 以上よろしくお願いします。