|
■No54099 (える さん) に返信
> FormTest01、FormTest02とあり、FormTest01からFormTest02を呼び出したとします。
> 起動はモードレス、FormTest01を親としてFormTest02を従属させます。
> この状態でFormTest01をFormTest02より前面に表示することは可能なのでしょうか。
無理だと思います。
Public Class FormTest01
Private WithEvents child As FormTest02
'これなら親を前にできる。ただし、親が手前にある間は親子関係が解除されている。
Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
child = New FormTest02()
child.Show(Me)
End Sub
Private Sub child3_Activated(ByVal sender As Object, ByVal e As EventArgs) Handles child.Activated
child.Owner = Me
End Sub
Private Sub child3_Deactivate(ByVal sender As Object, ByVal e As EventArgs) Handles child.Deactivate
child.Owner = Nothing
End Sub
End Class
Public Class FormTest02
Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
'親確認用
Me.Text = TypeName(Me.Owner)
End Sub
End Class
|