直接添加一個(gè)MID父窗體或在已有窗體的屬性中找到IsMDIContainer屬性,然后設(shè)置為True,然后創(chuàng)建第二個(gè)窗體 ,需要加載子窗體的時(shí)候:
目前創(chuàng)新互聯(lián)公司已為千余家的企業(yè)提供了網(wǎng)站建設(shè)、域名、網(wǎng)站空間、網(wǎng)站托管維護(hù)、企業(yè)網(wǎng)站設(shè)計(jì)、尤溪網(wǎng)站維護(hù)等服務(wù),公司將堅(jiān)持客戶導(dǎo)向、應(yīng)用為本的策略,正道將秉承"和諧、參與、激情"的文化,與客戶和合作伙伴齊心協(xié)力一起成長,共同發(fā)展。
Dim NewMDIChild As New Form2
NewMDIChild.MdiParent = Me
NewMDIChild.Show()
Public?Shared?Sub?CheckMDIChildForm(ByVal?MDIForm?As?Windows.Forms.Form,?ByVal?MDIChildForm?As?Windows.Forms.Form,?ByVal?MDIChildFormName?As?String)
If?MDIForm.MdiChildren.Length??1?Then
'如果沒有任何一個(gè)MDI子窗體,則創(chuàng)該MDI子窗體的窗體實(shí)例
Dim?MDIChildFrm?As?Windows.Forms.Form?=?MDIChildForm?'?定義MDI子窗體
MDIChildFrm.MdiParent?=?MDIForm?'指定父窗體
MDIChildFrm.Show()?'打開窗體
Exit?Sub
Else
Dim?x?As?Integer
Dim?frmyn?As?Boolean
For?x?=?0?To?(MDIForm.MdiChildren.Length)?-?1
Dim?tempChild?As?Windows.Forms.Form?=?CType(MDIForm.MdiChildren(x),?Windows.Forms.Form)
If?tempChild.Name?=?MDIChildFormName?Then
'檢測到有該MDI子窗體,設(shè)為激活?并退出循環(huán)
frmyn?=?True
tempChild.BringToFront()
Exit?For
Else
frmyn?=?False
End?If
Next
If?Not?frmyn?Then
'在打開的窗體中沒檢測到則新建
Dim?MDIChildFrm?As?Windows.Forms.Form?=?MDIChildForm?'?定義MDI子窗體
MDIChildFrm.MdiParent?=?MDIForm?'指定父窗體
MDIChildFrm.Show()?'打開窗體
End?If
End?If
End?Sub
給你個(gè)例子就知道了
Public Class Form1
'演示為動(dòng)態(tài)添加的控件添加事件
Private WithEvents Tb As New TextBox '方法2必須這樣寫
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
' Dim Tb As New TextBox
Tb.Name = "Textbox1"
Tb.Text = "文本框1"
Controls.Add(Tb)
AddHandler Tb.KeyPress, AddressOf XX '方法1,移動(dòng)鼠標(biāo)觸發(fā)
End Sub
Private Sub XX()
MsgBox("AddHandler方法")
End Sub
Private Sub ShowClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Tb.Click '方法2,單擊觸發(fā)
MsgBox("Handles方法,你點(diǎn)擊了" sender.name)
End Sub
End Class
mytest1是繼承自什么類,通常應(yīng)該繼承自UerControl,雖然你這樣也能編譯通過,但實(shí)際上沒有任何意義。所以你先改了再說。繼承之后,編譯,工具箱就會(huì)多這么個(gè)控件,拖動(dòng)到Form1上,這樣按鈕下就不用再new了。然后你再來問。
緩存刷新了,你需要在緩存區(qū)建立一個(gè)Image對(duì)象來存放所有繪制的Graphics對(duì)象,再將Image對(duì)象顯示在GroupBox容器中即可。