换显卡驱程
alt+F4
ctrl+Break

解决方案 »

  1.   

    chenyu5188(蓝色情调)请问使用那个api函数还原?
      

  2.   

    有一个API可以还原,就是设置屏蔽的哪个!将它的一个参数改了就行了!!
    我忘记了哪个API,你自己去查一查!
      

  3.   

    禁止使用 Alt-Tab 或 Ctrl-Alt-Del 
     
     
     
           
    Private Declare Function EnableWindow Lib "user32" (ByVal hWnd As Integer, ByVal aBOOL As Integer) As Integer
    Private Declare Function IsWindowEnabled Lib "user32" (ByVal hWnd As Integer) As Integer
    Private Declare Function GetMenu Lib "user32" (ByVal hWnd As Integer) As Integer
    Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
    Private Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByVal lpvParam As Any, ByVal fuWinIni As Long) As LongPrivate TaskBarhWnd As Long
    Private IsTaskBarEnabled As Integer
    Private TaskBarMenuHwnd As Integer
    '禁止或允许使用 Alt-Tab
    Sub FastTaskSwitching(bEnabled As Boolean)
    Dim X As Long, bDisabled As Long
    bDisabled = Not bEnabled
    X = SystemParametersInfo(97, bDisabled, CStr(1), 0)
    End Sub
    '禁止使用Ctrl-Alt-Del
    Public Sub DisableTaskBar()
    Dim EWindow As Integer
    TaskBarhWnd = FindWindow("Shell_traywnd", "")
    If TaskBarhWnd <> 0 Then
    EWindow = IsWindowEnabled(TaskBarhWnd)
    If EWindow = 1 Then
    IsTaskBarEnabled = EnableWindow(TaskBarhWnd, 0)
    End If
    End If
    End Sub
    '允许使用Ctrl-Alt-Del
    Public Sub EnableTaskBar()
    If IsTaskBarEnabled = 0 Then
    IsTaskBarEnabled = EnableWindow(TaskBarhWnd, 1)
    End If
    End Sub禁止 Ctrl+Alt+Del
    声明(For Win95):
    Const SPI_SCREENSAVERRUNNING = 97
    Private Declare Function SystemParametersInfo Lib "user32" Alias _
    "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, _
    lpvParam As Any, ByVal fuWinIni As Long) As Long
    使用:
    '禁止
    Dim pOld As Boolean
    Call SystemParametersInfo(SPI_SCREENSAVERRUNNING, True, pOld, 0)
    '开启
    Dim pOld As Boolean
    Call SystemParametersInfo(SPI_SCREENSAVERRUNNING, False, pOld, 0)