vb.net關(guān)閉指定windowsname的頁面

使用VB.NET關(guān)閉指定WindowsName的頁面可以通過使用System.Diagnostics.Process類的Kill方法來完成。

公司主營業(yè)務(wù)：成都網(wǎng)站設(shè)計、成都網(wǎng)站制作、移動網(wǎng)站開發(fā)等業(yè)務(wù)。幫助企業(yè)客戶真正實現(xiàn)互聯(lián)網(wǎng)宣傳，提高企業(yè)的競爭能力。創(chuàng)新互聯(lián)是一支青春激揚、勤奮敬業(yè)、活力青春激揚、勤奮敬業(yè)、活力澎湃、和諧高效的團隊。公司秉承以“開放、自由、嚴(yán)謹(jǐn)、自律”為核心的企業(yè)文化，感謝他們對我們的高要求，感謝他們從不同領(lǐng)域給我們帶來的挑戰(zhàn)，讓我們激情的團隊有機會用頭腦與智慧不斷的給客戶帶來驚喜。創(chuàng)新互聯(lián)推出樺南免費做網(wǎng)站回饋大家。

Kill方法接受一個參數(shù)，即要關(guān)閉的進程的窗口名稱，該窗口名稱可以通過Process.GetProcessesByName函數(shù)獲得，這樣就可以遍歷找到任何一個指定的窗口名稱并將其關(guān)閉。例如：

Dim process As Process = Process.GetProcessesByName(“MyApplication.exe”)

process.Kill()

vb.net 怎么結(jié)束進程

好像不難吧？

我放進了Button1的Click事件里。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

On Error GoTo Errmessages '在做系統(tǒng)操作時加排錯標(biāo)簽是個好習(xí)慣

Dim TargetName As String = "ibmdict" '存儲進程名為文本型，注：進程名不加擴展名

Dim TargetKill() As Process = Process.GetProcessesByName(TargetName) '從進程名獲取進程

Dim TargetPath As String '存儲進程路徑為文本型

If TargetKill.Length 1 Then '判斷進程名的數(shù)量，如果同名進程數(shù)量在2個以上，用For循環(huán)關(guān)閉進程。

For i = 0 To TargetKill.Length - 1

TargetPath = TargetKill(i).MainModule.FileName

TargetKill(i).Kill()

Next

ElseIf TargetKill.Length = 0 Then '判斷進程名的數(shù)量，沒有發(fā)現(xiàn)進程直接彈窗。不需要的，可直接刪掉該If子句

MsgBox("沒有發(fā)現(xiàn)進程！")

Exit Sub

ElseIf TargetKill.Length = 1 Then '判斷進程名的數(shù)量，如果只有一個，就不用For循環(huán)

TargetKill(0).Kill()

End If

MsgBox("已終止" TargetKill.Length "個進程") '彈窗提示已終止多少個進程

Errmessages: ‘定義排錯標(biāo)簽

If Err.Description Nothing Then ’判斷有無錯誤，如果有，則 ↓

MsgBox(Err.Description) '當(dāng)出現(xiàn)錯誤時，彈窗提示

End If

End Sub

可根據(jù)需要自行修改，這個備注夠完善了吧？不會的再Hi我。

VB中怎么實現(xiàn)關(guān)閉窗口？

VB中關(guān)閉窗口直接使用Unload就可以。\x0d\x0aUnload語句卸載 Form對象或控件。\x0d\x0a其語法: Unload object \x0d\x0aobject 所在處是要卸載的 Form 對象或控件數(shù)組元素的名稱。 \x0d\x0a\x0d\x0a例子：點擊按鈕彈出Form2窗體，關(guān)閉自身窗體\x0d\x0aPrivate Sub Command1_Click()\x0d\x0a Form2.Show' 彈出form2\x0d\x0a Unload Me‘關(guān)閉自身窗體\x0d\x0aEnd Sub