Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
  Dim frm2 As New Dialog1
  With frm2
    .FormBorderStyle = Windows.Forms.FormBorderStyle.None
    .TopLevel = False
    .Visible = True
    .Anchor = AnchorStyles.Top Or AnchorStyles.Right Or AnchorStyles.Bottom Or _
      AnchorStyles.Left
    .Dock = DockStyle.Fill
  End With
  TabPage1.Controls.Add(frm2)
End Sub

Grüße Andi

Beitrag wurde zuletzt am 30.10.15 um 21:25:15 editiert.