vb點虐 設置子窗口 vb窗口設計怎么做

vb點虐 mdiform的父窗口調用子窗口的函數

既然子窗體都有同名函數，就應該對子窗體進行一層封裝，子類實現不同方法

創(chuàng)新互聯專注于任城企業(yè)網站建設,響應式網站,商城網站開發(fā)。任城網站建設公司,為任城等地區(qū)提供建站服務。全流程定制網站制作，專業(yè)設計，全程項目跟蹤，創(chuàng)新互聯專業(yè)和態(tài)度為您提供的服務

Public?MustInherit?Class?AbstractChild

Public?MustOverride?Sub?Method1()

End?Class

Public?Class?ChildClass1

Inherits?AbstractChild

Public?Overrides?Sub?Method1()

MessageBox.Show("class1")

End?Sub

End?Class

Public?Class?ChildClass2

Inherits?AbstractChild

Public?Overrides?Sub?Method1()

MessageBox.Show("class2")

End?Sub

End?Class

Public?Class?ChildClass3

Inherits?AbstractChild

Public?Overrides?Sub?Method1()

MessageBox.Show("class3")

End?Sub

End?Class

Dim?child1?As?New?ChildClass1()

Dim?child2?As?New?ChildClass2()

Dim?child3?As?New?ChildClass3()

child1.Method1()

child2.Method1()

child3.Method1()

如何給VB.NET窗體添加子窗體？

直接添加一個MID父窗體或在已有窗體的屬性中找到IsMDIContainer屬性，然后設置為True，然后創(chuàng)建第二個窗體 ，需要加載子窗體的時候：

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

'如果沒有任何一個MDI子窗體，則創(chuàng)該MDI子窗體的窗體實例

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子窗體，設為激活?并退出循環(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

vb點虐 怎樣正確建立父子窗體？（容器問題）

要確立父子窗體，那子窗體必須繼承父窗體。實例化子窗體對象調用Show()方法。

希望采納

vb點虐 設置mdi子窗口隨父窗口的大小而變化

簡單一點的方式是，在MDI主窗體內添加一個picturebox控件，然后在這個picturebox中添加一個image控件。

Picture1的屬性：

1.Align=top

2.Appearance=flat

3.BordeStyle=None

4.TabStop=false

Image1的屬性：

1.Stretch=true

在MDI窗體的resize事件中添加如下代碼：

Private Sub MDIForm_Resize()

Me.Picture1.Height = Me.Height

End Sub

在Picture1控件的resize事件中添加如下代碼：

Private Sub Picture1_Resize()

Me.Image1.Move 0, 0, Me.Picture1.Width, Me.Picture1.Height

End Sub

本文題目：vb點虐 設置子窗口 vb窗口設計怎么做
鏈接地址：http://bm7419.com/article42/ddejjec.html

成都網站建設公司_創(chuàng)新互聯，為您提供網站制作、定制開發(fā)、搜索引擎優(yōu)化、App設計、域名注冊、App開發(fā)

廣告

聲明：本網站發(fā)布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創(chuàng)新互聯