0

私の親フォームにはいくつかのコントロールがあり、MDI 子フォームは親フォームの下部にポップアップするはずです。これはすべて計画どおりに機能しますが、問題は、子フォームが親フォームのコントロールの背後にポップアップし続けることです。親フォームは TopMost で false に送信され、子は True に送信されます。また、子フォームを前面に移動しようとしましたが、何もしませんでした。

子フォームもボーダーレスです。ボーダーを元に戻して、それが違いを生むかどうかを確認しようとしましたが、違いはありませんでした。子フォームを呼び出すコードは次のとおりです。

Private Sub ToggleButton(strButtonName As String, strReportTitle As String, strButtonDescription As String, objButton As Object, boolView As Boolean, boolStatus As Boolean)

Dim btnDescription As New frmButtonDescription(Me)

        If Not m_cToggleFlags.ContainsKey(strButtonName) Then
            m_cToggleFlags.Add(strButtonName, False)
        End If

        If m_cToggleFlags(strButtonName) Then

            btnDescription.Hide()
        Else

            btnDescription.lblReportTitle.Text = strReportTitle
            btnDescription.lblReportDescription.Text = strButtonDescription
            btnDescription.MdiParent = Me

            btnDescription.Show()
            btnDescription.BringToFront()
            btnDescription.btnOpenReport.Visible = boolView
            btnDescription.btnOpenDashboard.Visible = boolStatus


        End If

        m_cToggleFlags(strButtonName) = Not m_cToggleFlags(strButtonName)

    End Sub
4

0 に答える 0