屏蔽快捷菜单Alt+F4
Protected Overrides Function ProcessCmdKey() Function ProcessCmdKey()Function ProcessCmdKey()Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean
If keyData = (Keys.Alt Or Keys.F4) Then
Return True
Else
Return MyBase.ProcessCmdKey(msg, keyData)
End If
End Function
Call ProcessCmdKey(msg, Keys.F4)
屏蔽窗体的关闭按钮。点击关闭按钮时,不关闭。
Private Sub FormMain_FormClosing()Sub FormMain_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
End Sub
Protected Overrides Function ProcessCmdKey() Function ProcessCmdKey()Function ProcessCmdKey()Function ProcessCmdKey(ByRef msg As Message, ByVal keyData As Keys) As Boolean
If keyData = (Keys.Alt Or Keys.F4) Then
Return True
Else
Return MyBase.ProcessCmdKey(msg, keyData)
End If
End Function
Call ProcessCmdKey(msg, Keys.F4)
屏蔽窗体的关闭按钮。点击关闭按钮时,不关闭。
Private Sub FormMain_FormClosing()Sub FormMain_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
End Sub