vb.net - 子フォームを閉じる方法

Question

MDIと子フォームの使用

コード。

childform_load

Me.MdiParent = MDIMain

'

 Private Sub form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
     If e.KeyCode = Keys.Escape Then
         Me.Close()
     End If
 End Sub

上記のコードはMDIフォーム（フォーム名はmdiform1）で機能しますが、子フォーム1では機能しません。エスケープキーを押すと、子フォームではなくMDIフォームが閉じられます。

子フォーム名も確認します。名前はform1のみです。

問題は何でしたか、子フォームのプロパティを変更する必要があります。

コードのヘルプが必要

Answer 1

これは私のために働く

Private Sub Form1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
        If e.KeyCode = Keys.Escape Then
            For Each child As Form In Me.MdiParent.MdiChildren
                child.Close()
            Next child
        End If
    End Sub

Answer 2

子フォームイベントを発生させようとすると、親フォームの「form1_KeyDown」イベントが発生します。