- ベストアンサー
WindowState Minimized(最小)で起動したものを、事後的にコードを使って最大化
画面を最小(WindowState Minimized)で起動したものを コードを使って最大化するには、 どのプロパティを使えばいいのでしょうか。 サーバー用ソフトなので、タスクバーには、 表示されないので、システムトレイにアイコンを おき、そこから、画面を表示できるようにしたい のです。 (C#を使っていますが、VBでも大体同じに出来るの で、お願いします)。
- rheda
- お礼率69% (257/372)
- Visual Basic
- 回答数1
- ありがとう数1
- みんなの回答 (1)
- 専門家の回答
質問者が選んだベストアンサー
WindowStateプロパティに vsWindowStateMaximize か FormWindowState.Maximized を設定すればいいと思います
関連するQ&A
- 3フォームの重なり順を変えない方法+同時最小化
今晩は、質問させていただきます。どうぞよろしくお願いいたします。 Form1(メインフォーム)の下にForm2を、 Form2の下にForm3を表示し、これらの順番が変わらないように致したく、 次のようにコーディングいたしました。 【Form1のコード】 Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim form2o As New Form2 Dim form3o As New Form3 Me.Owner = form2o form2o.Show() End Sub 【Form2のコード】 Private Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim form3o As New Form3 Me.Owner = form3o form3o.Show() End Sub この状態のまま、タスクバー上のアプリケーション名をクリックした際の 最小化⇔普通化を(3フォームとも一緒に)させたいのですがうまくいきません。。 Form1に、下の【コード1】のようにコーディングいたしましたら、 タスクバーのForm1クリック(最小化) →3つとも最小化(成功)いたしますが、 Form1とForm2がタスクバー上から消えてしまい、Form1クリックによる最大化ができなくなります。 またForm3に、下の【コード2】のようにコーディングいたしましたら、 タスクバーのForm3をクリックしてもForm1が一回ちらつくだけで、最小化すらできません。。 まったく違うイベントを取る方法や、Owner指定方法自体を行わない方法でも結構でございますので、 何かこの動作をうまくできる方法はないでございましょうか? ずっと悩んでおりますが、解決致しません。もしお詳しい方がいらっしゃいましたら, 是非ともアドバイスいただきたく、どうぞよろしくお願いいたします。 【コード1】 Public Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize Dim form2o As New Form2 If Me.WindowState = FormWindowState.Minimized Then Owner.WindowState = FormWindowState.Minimized Owner.Owner.WindowState = FormWindowState.Minimized ElseIf Me.WindowState = FormWindowState.Normal Then Owner.WindowState = FormWindowState.Normal Owner.Owner.WindowState = FormWindowState.Normal End If End Sub 【コード2】 Public Sub Form3_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize If Me.WindowState = FormWindowState.Minimized Then Form1.WindowState = FormWindowState.Minimized Form2.WindowState = FormWindowState.Minimized ElseIf Me.WindowState = FormWindowState.Normal Then Form2.WindowState = FormWindowState.Normal Form1.WindowState = FormWindowState.Normal End If End Sub 何卒お願いいたします。
- ベストアンサー
- Visual Basic
- access アプリケーションの最大化をしたい
Ofiice2007を使っています。 エクセルなら Sub test() Application.WindowState = xlMaximized End Sub で最大化できますが、アクセスで同じコードを実行するとエラーになります。 Application.WindowState = acMaximized にしてもダメでした。 オブジェクトブラウザで検索したところ WindowStateもacMaximizedもアクセスにはないようです。 ヘルプでWindowStateを検索したところ、 WindowState プロパティと言うのを見つけました。 内容は、 ↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓↓ ウィンドウの表示状態を指定する数値を設定します。値の取得も可能です。 設定値 WindowState プロパティの設定値は、次のとおりです。 定数 値 内容 vbext_ws_Normal 0 (既定値) ノーマル vbext_ws_Min 1 最小化 (タスクバーに縮小表示) vbext_ws_Max 2 最大化 (画面全体に拡大表示) ↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑↑ とのことですが、どうやって使えば良いでしょう? Sub test() Application.WindowState = vbext_ws_Max End Sub だとダメでした。 ご教授よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- VB.NET:モーダルで表示したフォームを最小化
Form2をForm1の所有として、モーダルで表示しました。 '------------------------ Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdChildMdl.Click 'Form2を開く Dim frmN As New Form2 frmN.ShowDialog(Me) 'MeはForm1 End Sub '------------------------ Form2が最小化された時に、親フォームであるForm1も最小化させたいと思い、 Form2のResizeメソッドに以下のようなコードを書きました。 '------------------------ Private Sub Form2_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Resize Select Case Me.WindowState Case FormWindowState.Minimized '親フォームも最小化((1)) Me.Owner.WindowState = FormWindowState.Minimized Case FormWindowState.Maximized '親フォームも最大化((2)) Me.Owner.WindowState = FormWindowState.Maximized Case FormWindowState.Normal '親フォームも通常サイズ((3)) Me.Owner.WindowState = FormWindowState.Normal End Select End Sub '------------------------ しかし、(2)、(3)は問題なく実行できるのですが、 (1)を実行すると、自フォーム(Form2)が閉じてしまうのです。 そういう仕様なのでしょうか? ご存知の方、教えてください。よろしくお願いします。
- 締切済み
- Visual Basic
- インターネットで最小化してから最大化すると動かない
インターネットで最小化してから最大化すると動かない インターネットで最小化してから最大化すると動かないなくなります まず、最大化してから最小化すると 最小化したところだけでてきて、スクロールバーからは真っ白になります それからは画面がおかしくなり、タスクバーなどIEのアドレスなどが歪みます 閉じるとなくなりますが、セッションが出ます 昨日の夜からです ウイルス検査済みです よろしくおねがいします
- ベストアンサー
- その他(インターネット接続・通信)
- 閉じる・最大化・最小化ボタンが無くなった
Private Sub Workbook_Open() ThisWorkbook.Protect Windows:=True End Sub 上記のコードを、エクセルのブックに設定したのですが、ブックの画面が半分のままになってしまい、最大化で表示させることができませんでした。 なので、元に戻そうと思い、このコードを削除しましたが、元に戻りませんでした(>O<) どうしたら、最小化・最大化・閉じるボタンを表示させることができるのでしょうか?! もしくは、最小化・最大化・閉じるボタンを無効にして、画面は最大で表示させるようなマクロがあったら、伝授して頂きたいと思います!! 宜しくお願い致します。
- ベストアンサー
- Windows XP
- タスクバーから最大化できないときがある。
よろしくお願いいたします。 IEです。 タスクバーに最小化してアイコンになったウインドウが10枚(か、それ以上)あり、 タスクバーのアイコンをクリックして画面を切り替えています。 しかし、アイコンをクリックしても画面が切り替わらないときがあります。 最大化するときの画面効果は見えるのですが、画面は元のままです。 このとき、元のままのほうの画面を最小化すれば、希望の画面が見えるのですが。 最大化しなかったとき、もう一度アイコンをクリックすると、開きたいと思った画面が、 最小化する画面効果も見えます。 これは、ウインドウズの問題でしょうか。ハードの問題でしょうか。 最大化しないときに、なにか確認するべき事柄があるでしょうか。 対策方法があるでしょうか。 「タブブラウザにしろ」というご意見はよく見かけるのですが。
- ベストアンサー
- Windows XP
- [VB]親画面と子画面の画面サイズ最小化について
VB2012でwindowsアプリの開発を行っております。 親フォームから子フォームをShowDialogで起動する画面があるのですが、 親フォームを最小化して、子フォームは通常サイズで表示させたいです。 以下のコードを実行すると、親と子の両画面が最小化されてしまいます。 どなたかご教授頂くと助かります。宜しくお願い致します。 ----------コード-------------- Private Sub 子フォーム起動_Click Me.WindowState = FormWindowState.Minimized Dim frm As New 子フォーム frm.ShowDialog(Me) frm.Dispose() End Sub
- 締切済み
- Visual Basic
- VBのフォームサイズについて
Win2000、VB6.0SP5で開発しようとしております。 そこで、起動時に最大化された状態にしたいと思っております。 VSにてフォームのプロパティで、「WindowState=最大化」とすればできるかと思っていたのですが。 Windowsのタスクバーの下に画面が隠れてしまいます。初め、標準として起動させ、最大化ボタンで最大にすると、タスクバーの上までで最大化でき隠れることはありません。 起動時に、タスクバーを考慮して最大化させることは可能でしょうか? よろしくお願いします。
- 締切済み
- Visual Basic
- OFFICE2013は最小化のボタンがなくなった?
OFFICE2003からいきなり2013に変え、GUIに戸惑っております。 画面右上のボタン 「_」最小化、「□」最大化、「×」閉じる のうち、「_」最小化が無くなっています。 タスクトレイに収納するには、左上のアイコンから「最小化」を選ぶしかないのでしょうか?
- 締切済み
- その他MS Office製品
- vb.net 最小化時のアイコン
vb.net2005に関しての質問です。 アプリケーションを最小化した時に、下のタスクバーに表示させずに右下のアイコンがたくさんならんでいるところにアイコンを表示させるようにするにはどうすればいいでしょうか?
- ベストアンサー
- Visual Basic
お礼
回答ありがとうございます。 まさに思い通りの動作になりました。