VB.NET質問スレ (Part8)
■ このスレッドは過去ログ倉庫に格納されています
0124114
NGNG実際に試せたので199さんを参考に試しで作ってみました。
Aのフォーム
Private Sub btn1_Click(略)
Dim f As New A '宣言
f.Owner = Me '親フォーム宣言
Me.WindowState = FormWindowState.Minimized 'アクティブなフォームのサイズを最小にする
Me.Enabled = False 'ユーザーの受付を不可にする
f.Show() 'フォームBを表示する
End Sub
Bのフォーム
Private Sub btn2_Click(略)
Me.Owner.WindowState = FormWindowState.Normal '親フォームのサイズを通常に戻す
Me.Owner.Enabled = True 'ユーザーの受付を可能にする
Me.Close() 'フォームを閉じる
End Sub
のように記述したのですけれど、子フォームから親フォームに移るとき(Bを閉じてAを通常サイズに戻す)は
成功したのですが、Aのフォームを最小化してBのフォームを表示させるときに
Bのフォームは表示できるのですが、最小化された状態で出てきます。
Bのフォームロードイベントに通常サイズに戻すように記述してもうまくいきませんでした。
よい方法ないでしょうか?聞いてばかりですいません;w;
■ このスレッドは過去ログ倉庫に格納されています