我用了这段代码以后,在预览窗口的时候经常电脑死机是咋回事,谢谢老师 放在AfterLoad里
Dim PB As WinForm.Panel = e.Form.Controls("Panel2")
Dim Name As String = "8" '只要修改一下这里就行 ,窗口的名称
Forms(Name).OPEN(-1000,-1500)
Forms(Name).BaseForm.TopLevel = False
Forms(Name).BaseForm.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
Forms(Name).BaseForm.Dock = System.Windows.Forms.DockStyle.Fill
PB.BaseControl.Controls.Clear
PB.BaseControl.Controls.add(Forms(Name).BaseForm)
[此贴子已经被作者于2015-1-17 15:00:13编辑过]