tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル Re^8: アプリケーションの起動について
投稿日: 2008/09/01(Mon) 17:37
投稿者じゅん
> > Me.TopMost = True
> > Shell(objclass.gFunc_ReadAccPath & " " & objclass.GetAppPath & basCommon.basCommon.gcMASTERREP & " " & " /x M_地域マスタリスト", , True)
> >                    
>
> この時点でフォーカスが A フォームに移っていませんか?
>
> Me.Focus()  'でもう一度 B フォームにファーカスを移してから
>
> > MsgBox("印刷処理が終了しました。", MsgBoxStyle.DefaultButton1)
> > Me.TopMost = False
>
> 上記を実施し、それでも、MsgBox を表示した時点で A フォームにフォーカスが移って
> いるのなら、B フォームを終了を待って、A フォームを表示するようにでもしてみては。
>
> MsgBox は、MsgBoxStyle.MsgBoxSetForeground にしていたのでは。

返答ありがとうございます。

Me.TopMost = True
Shell(objclass.gFunc_ReadAccPath & " " & objclass.GetAppPath & basCommon.basCommon.gcMASTERREP & " " & " /x M_地域マスタリスト", , True)

Me.Focus()

MsgBox("印刷処理が終了しました。", MsgBoxStyle.DefaultButton1)
Me.TopMost = False

で実行してみたのですが、Bフォームは手前にきていますが、フォーカスはAフォームにあります(涙)。そこで、メッセージボックスの所を
MsgBox("印刷処理が終了しました。", MsgBoxStyle.MsgBoxSetForeground)
にしたら、Bフォームが手前に来た状態で、Enterキーを押下すると、メッセージボックスが閉じました。
MsgBox("印刷処理が終了しました。", MsgBoxStyle.MsgBoxSetForeground)にするとデメリットがあるのでしょうか??

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

古いスレッドにレスはつけられません。