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

タイトル Re^10: アプリケーションの起動について
投稿日: 2008/09/02(Tue) 09:44
投稿者じゅん
おはようございます。ご返事ありがとうございます。

> A のForm を最小化にしておいた場合はどうなるかと。
これについてですが、印刷参照(プレビュー)については、Shellの前に、Bフォームを最小化し、Sell後にBフォームを元のサイズに戻し、TopMost=True  TopMost=False とすると、Bフォームが手前にくるようになります。もちろん、メッセージボックスが表示され、Enterキーを押下すると、メッセージボックスのOKボタンを押下したことになる。

Me.WindowState = FormWindowState.Minimized
Shell(objclass.gFunc_ReadAccPath & " " & objclass.GetAppPath & basCommon.basCommon.gcMASTERREP & " " & " /x M_地域マスタリスト画面", vbMaximizedFocus, True)
Me.WindowState = FormWindowState.Normal
Me.TopMost = True
Me.TopMost = False

※印刷参照時は、Bフォームは最小化になっててもいいのですが(格好が)、印刷時には、最小化はしたくはないですね・・・(見た目がわるので(笑))

※OSがXPで印刷参照時の以下のコードでコンパイル(ビルド)すると、うまくいきます。
サイズの変更はしなくてもいける。

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

OSがVistaの時の不具合でもあるのだろうか・・・。それとも動作が不安定??

> A のForm に Me.Focus() なんて書いていませんよね?
もちろんやっていません(笑)


VB6.0の時はTopMos(あったか忘れましたが・・)なんて使用しなくてもいけたのに・・・

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

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