VB锁定屏幕编程.docVIP

窗体代码 Option Explicit Dim m_Exit As Boolean 限制ALT+F4退出窗体 ******隐藏任务栏代码************************************ 参数；lpClassName 指定了包含了窗口类名中的空中止，字串的指针，或设为0。表示接收任何类。 参数；lpWindowName 指向包含了窗口文本的空中止，字串的指针。或设为0。表示接收任何窗口标题。 功能；寻找窗口列表中第一个符合指定条件的顶级窗口。 Private Declare Function FindWindow Lib user32 Alias FindWindowA _ (ByVal lpClassName As String, _ ByVal lpWindowName As String) As Long Private Declare Function ShowWindow Lib user32 (ByVal hwnd As Long, _ ByVal nCmdShow A