掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
最大化状態の子フォームからフォーカスが失ったとき、最大化を維持するには？ (ID:123959)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
＞030さん 書き方が説明不足で失礼致しました。 「最大化した子フォームが、アクティブでなくなったときに、 元のサイズに戻ってしまいます」 という意味です。 新規で別の子フォームを開いたり、 別の子フォームにフォーカスを移すと、 元のサイズに戻ってしまうのです。 ＞再現可能なコード とりあえず、上記の１，２の内容をコードにしたものを載せます。 １， Private Sub Command1_Click() dim sizeFlg as boolean If Me.WindowState = vbMaximized Then sizeFlg = True Else sizeFlg = False End If form2.show If clientSizeFlg = True Then Me.WindowState = vbMaximized End If End Sub ２， dim sizeFlg as boolean Private Sub Form_Resize() If Me.WindowState = vbMaximized Then sizeFlg = True Else sizeFlg = False End If End Sub Form_LostFocus() If clientSizeFlg = True Then Me.WindowState = vbMaximized End If End Sub
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.