禁止使用Alt F4关闭窗口

文章作者 100test 发表时间 2011:03:18 20:36:20
来源 100Test.Com百考试题网

　　禁止使用 Alt F4 关闭窗口
　　声明：
　　’Vb man 2001
　　’URL: http://goodvbman.yeah.net
　　’E-mail: [email protected]
　　Private Declare Function GetSystemMenu Lib "user32" Alias "GetSystemMenu"
　　(ByVal hwnd As Long, ByVal bRevert As Long) As Long
　　Private Declare Function DeleteMenu Lib "user32" (ByVal hMenu As Long,
　　ByVal nPosition As Long, ByVal wFlags As Long) As Long
　　Private Declare Function GetMenuItemCount Lib "user32" (ByVal hMenu As
　　Long) As Long
　　Private Const MF_BYPOSITION =