在該按紐的單擊事件編寫代碼:
10年積累的成都網(wǎng)站設(shè)計、成都做網(wǎng)站經(jīng)驗(yàn),可以快速應(yīng)對客戶對網(wǎng)站的新想法和需求。提供各種問題對應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識你,你也不認(rèn)識我。但先網(wǎng)站策劃后付款的網(wǎng)站建設(shè)流程,更有殷都免費(fèi)網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。
Private
Sub
Button1_Click(ByVal
sender
As
System.Object,
ByVal
e
As
System.
EventArgs
)
Handles
Button1.Click
Me.Close()
End
Sub
在VB6的時候,使用:Unload
me
在VB.NET里使用:Me.Close()
Private?Sub?Form2_FormClosed(sender?As?Object,?e?As?FormClosedEventArgs)?Handles?Me.FormClosed
End????'退出后關(guān)閉軟件
End?Sub
'點(diǎn)擊關(guān)閉按鈕時彈出對話框判斷是否退出
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
Form_Deactivate事件在窗體被卸載時觸發(fā),在其中中加一行End結(jié)束程序就行了