MDIアプリケーション＠VB.Net
MID(マルチドキュメントインターフェイス)アプリケーションの作成です。
以下の様なものです。
親フォーム内に子フォームがあります。
親フォームは、、IsMDIContainerプロパティを「True」に設定します。
これで親フォームとなります。
子フォームは、MdiParentに親フォームを指定します。
以下では、From1を親フォームとしています。
フォームロード時に、子フォームを作成し、
親フォームを設定した後に、表示を行います。
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'子フォーム作成
Dim form As Form2 = New Form2
'親フォーム設定
Form2.MdiParent = Me
'子フォーム表示
Form2.Show()
End Sub
End Class
|
