Private?Sub?Form2_FormClosed(sender?As?Object,?e?As?FormClosedEventArgs)?Handles?Me.FormClosed
讓客戶(hù)滿(mǎn)意是我們工作的目標(biāo),不斷超越客戶(hù)的期望值來(lái)自于我們對(duì)這個(gè)行業(yè)的熱愛(ài)。我們立志把好的技術(shù)通過(guò)有效、簡(jiǎn)單的方式提供給客戶(hù),將通過(guò)不懈努力成為客戶(hù)在信息化領(lǐng)域值得信任、有價(jià)值的長(zhǎng)期合作伙伴,公司提供的服務(wù)項(xiàng)目有:申請(qǐng)域名、網(wǎng)絡(luò)空間、營(yíng)銷(xiāo)軟件、網(wǎng)站建設(shè)、揭陽(yáng)網(wǎng)站維護(hù)、網(wǎng)站推廣。
End????'退出后關(guān)閉軟件
End?Sub
'點(diǎn)擊關(guān)閉按鈕時(shí)彈出對(duì)話(huà)框判斷是否退出
Private?Sub?Form2_FormClosing(sender?As?Object,?e?As?FormClosingEventArgs)?Handles?Me.FormClosing
'經(jīng)典判斷關(guān)閉法
If?MessageBox.Show("是否退出?",?"確認(rèn)",?MessageBoxButtons.OKCancel,?MessageBoxIcon.Question,
MessageBoxDefaultButton.Button2)?=?Windows.Forms.DialogResult.Cancel?Then
e.Cancel?=?True
Else
e.Cancel?=?False
End?If
End?Sub
Allocconsle 打開(kāi)一個(gè)控制臺(tái)窗口
Call 調(diào)用DLL文件中的函數(shù)
Freeconsole 關(guān)閉控制臺(tái)窗口
Call 命令調(diào)用DLL文件中函數(shù)后,函數(shù)運(yùn)行時(shí),如果用戶(hù)關(guān)閉控制臺(tái),會(huì)彈出錯(cuò)誤對(duì)話(huà)框。
本人想實(shí)現(xiàn):當(dāng)用戶(hù)點(diǎn)擊控制臺(tái)關(guān)閉按鈕后,彈出一個(gè)確認(rèn)對(duì)話(huà)框,點(diǎn)確定,控制臺(tái)關(guān)閉,并不會(huì)出現(xiàn)錯(cuò)誤對(duì)話(huà)框;點(diǎn)取消,控制臺(tái)繼續(xù)運(yùn)行。
主窗體代碼調(diào)用Me.close不就可以了嗎?或者在任意代碼處調(diào)用Application.Exit()。如果不起作用的話(huà)是因?yàn)槟阍诖绑w關(guān)閉的事件中調(diào)用了e.Handle=True
既然是VB.NET,那么,窗體關(guān)閉的事件,是.net framework提供的,是FormClosed事件。也是兩個(gè)參數(shù),一個(gè)object sender這個(gè)是object基類(lèi),整個(gè).net framework都是從它派生的,一個(gè) EventArgs e,事件處理基類(lèi),一切事件是從EventArgs基類(lèi)派生出來(lái)的。
應(yīng)該是.net framework版本不對(duì)造成的,不可能是缺少dll,.net平臺(tái)的程序缺少dll并不會(huì)閃退,只會(huì)有錯(cuò)誤對(duì)話(huà)框.
也有可能是操作系統(tǒng)環(huán)境不一致導(dǎo)致閃退,比如win8生成的程序轉(zhuǎn)到xp上用.