在標準模塊里設置一個全局變量,窗體打開了把它設為True,窗體關閉設為False,通過判斷那個標志就知道窗體是否打開了:
創(chuàng)新互聯(lián)長期為成百上千家客戶提供的網(wǎng)站建設服務,團隊從業(yè)經(jīng)驗10年,關注不同地域、不同群體,并針對不同對象提供差異化的產(chǎn)品和服務;打造開放共贏平臺,與合作伙伴共同營造健康的互聯(lián)網(wǎng)生態(tài)環(huán)境。為雨山企業(yè)提供專業(yè)的做網(wǎng)站、網(wǎng)站建設,雨山網(wǎng)站改版等技術服務。擁有十余年豐富建站經(jīng)驗和眾多成功案例,為您定制開發(fā)。
Public
frmOpenFlag
As
Boolean
窗體上:
Private
Sub
Form_Load()
frmOpenFlag=True
......
End
Sub
Private
Sub
Form_Unload()
frmOpenFlag=False
End
Sub
其他窗體里判斷:
Private
Sub
Command1_Click()
If
frmOpenFlag
then
MsgBox
"Form1已經(jīng)打開!"
End
Sub
End
Sub
參考代碼:
Private?Sub?Form1_Closing(sender?As?Object,?e?As?CancelEventArgs)?Handles?Me.Closing
If?MessageBox.Show("確定要關閉嗎?",?Me.Text,?MessageBoxButtons.YesNo,?MessageBoxIcon.Question)?=?DialogResult.No?Then
e.Cancel?=?True
End?If
End?Sub
運行效果:
Dim?p?As?New?Process
p.StartInfo="d:\test.docx"
p.Start
p.WaitForExit()?'等待程序結(jié)束
Msgbox("文檔已經(jīng)關閉")
如果是單線程程序,在文檔關閉前就會一直卡住,所以要用多線程處理。
本文名稱:vb.net詢問是否關閉的簡單介紹
標題鏈接:http://muchs.cn/article10/doshjgo.html
成都網(wǎng)站建設公司_創(chuàng)新互聯(lián),為您提供動態(tài)網(wǎng)站、網(wǎng)站維護、自適應網(wǎng)站、響應式網(wǎng)站、網(wǎng)站改版、電子商務
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)