怎樣用VB.NET寫和調(diào)用DLl窗體

一、帶窗體的dll創(chuàng)建

創(chuàng)新互聯(lián)專注于株洲網(wǎng)站建設(shè)服務(wù)及定制，我們擁有豐富的企業(yè)做網(wǎng)站經(jīng)驗(yàn)。 熱誠為您提供株洲營銷型網(wǎng)站建設(shè)，株洲網(wǎng)站制作、株洲網(wǎng)頁設(shè)計(jì)、株洲網(wǎng)站官網(wǎng)定制、微信小程序定制開發(fā)服務(wù)，打造株洲網(wǎng)絡(luò)公司原創(chuàng)品牌,更為您提供株洲網(wǎng)站排名全網(wǎng)營銷落地服務(wù)。

1、先新建 類庫（testdll），在項(xiàng)目中添加兩個(gè)窗體form1(主窗體)、form2,為了與后面的調(diào)用區(qū)分分別命名為fm1,fm2；并在fm1窗體中添加一個(gè)按鈕用來調(diào)用fm2如下圖

2、在fm1窗體代碼中先引用fm2, ? ?按鈕代碼調(diào)用fm2.如圖

3、生成dll,(class1.vb中不需要寫任何代碼）

二、調(diào)用dll

1、新建 一個(gè)windows應(yīng)用程序并添加一個(gè)按鈕用來調(diào)用dll中的窗體，選 擇 “項(xiàng)目”－“添加引用”，選擇剛才創(chuàng)建的testdll

2、窗體代碼中先引用testdll,再定義一個(gè)testdll中的fm1對(duì)象，最后執(zhí)行對(duì)象的show方法

3、運(yùn)行結(jié)果如下：

如何創(chuàng)建vb.net窗體

dim 一個(gè)窗體 as new form

with 一個(gè)窗體

.location=...

.size=...'這里是設(shè)置窗體的位置等屬性

end with

一個(gè)窗體.show

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

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

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

'檢測(cè)到有該MDI子窗體，設(shè)為激活?并退出循環(huán)

frmyn?=?True

tempChild.BringToFront()

Exit?For

Else

frmyn?=?False

End?If

Next

If?Not?frmyn?Then

'在打開的窗體中沒檢測(cè)到則新建

Dim?MDIChildFrm?As?Windows.Forms.Form?=?MDIChildForm?'?定義MDI子窗體

MDIChildFrm.MdiParent?=?MDIForm?'指定父窗體

MDIChildFrm.Show()?'打開窗體

End?If

End?If

End?Sub