Guten Morgen,

ich würde gerne wissen, ob es möglich ist mit VB6 Formulare in Usercontrols einzubinden. Im Netz habe ich folgenden C Code gefunden, der das möglich machen soll.

public partial class UserControl1 : UserControl {
public UserControl1() {
InitializeComponent();
}
public void EmbedForm(Form frm) {
frm.TopLevel = false;
frm.FormBorderStyle = FormBorderStyle.None;
frm.Visible = true;
frm.Dock = DockStyle.Fill; // optional
this.Controls.Add(frm);
}
}

Der Sinn dahinter ist eine ähnliche Arbeitsumgebung wie die IDE von VB6 zu programmieren. Wenn man Formulare in Usercontrol Container stecken könnte, liessen sie sich in einem MDI Formular sehr praktisch positionieren und verankern.

Gruß,
Harcourt

Hey, ich habe die Lösung gefunden.

1. Public Declare Function SetParent Lib "user32" _
(ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

2. sub Test
Dim frm As New Form1
SetParent frm.hWnd, UserControl.hWnd
frm.Show