Private Sub UserForm_Terminate()
十載的伊犁網站建設經驗,針對設計、前端、開發、售后、文案、推廣等六對一服務,響應快,48小時及時工作處理。成都營銷網站建設的優勢是能夠根據用戶設備顯示端的尺寸不同,自動調整伊犁建站的顯示方式,使網站能夠適用不同顯示終端,在瀏覽器中調整網站的寬度,無論在任何一種瀏覽器上瀏覽網站,都能展現優雅布局與設計,從而大程度地提升瀏覽體驗。創新互聯從事“伊犁網站設計”,“伊犁網站推廣”以來,每個客戶項目都認真落實執行。
Unload frmSub '退出當前窗體前先關閉子窗體
End Sub
擴展資料
在次代碼運行的過程中,我們按Esc或者Ctrl+Break組合鍵是沒有效果的。如果我們在開發好的程序時候,可以加上這句代碼即可完成。順帶說下這格語句的使用方法:
Application對象的EnableCancelKey屬性控制將用戶中斷用于運行程序的處理,語法如下:expression.EnableCancelKey,參數是expression必需的,Application對象。
軟糖來回答羅:通過System.Diagnostics命名空間下的Process類來關閉程序的進程
Dim?進程集合?=?Process.GetProcessesByName("進程名稱")
For?Each?進程?In?進程集合
進程.Kill()
'進程.Close()?'或者使用關閉
Next
也可以先獲取所有進程,再來判斷這些進程的名稱ProcessName
Dim?獲取本地所有進程?=?Process.GetProcesses()
For?Each?進程?In?獲取本地所有進程
If?進程.ProcessName?=?"explorer.exe"?Then?進程.Kill()
Next
這樣的話你就不要直接把子窗口show出來,先在父窗口創建一個子窗口對象的變量,通過實例化該變量達到創建子窗口的目的,然后在下次又要打開子窗口時也可以通過該變量關閉原有的子窗口
示例代碼如下(假設Form1為父窗口,Form2為子窗口):
Form1的代碼:
Public
Class
Form1
Dim
nform
As
Form2
=
Nothing
Private
Sub
Button1_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.EventArgs)
Handles
Button1.Click
If
nform
IsNot
Nothing
Then
nform.Close()
nform.Dispose()
End
If
nform
=
New
Form2
nform.Show()
Me.Hide()
End
Sub
End
Class
通過nform變量,你可以很輕易就處理掉原來已經打開但隱藏著的子窗口了
網站名稱:vb.net關閉程序代碼,vb關閉窗口代碼
轉載來源:http://vcdvsql.cn/article2/hsojoc.html
成都網站建設公司_創新互聯,為您提供App設計、響應式網站、企業建站、Google、商城網站、外貿建站
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯