如何使用VBA锁定计算机

Question

如何使用Excel VBA锁定计算机？为了以防万一，通过“锁定计算机”我的意思是当你做“开始菜单 - >关机 - >锁定”时有相同的效果。

Answer 1

对于64位：

Option Explicit 

Private Declare PtrSafe Function LockWorkStation Lib "user32.dll"() As Long 

Private Sub LockStation() 
    LockWorkStation 
End Sub 

对于X32位：

我觉得是这样的，无法测试，因为我没有32位PC。

Option Explicit 

    Private Declare Function LockWorkStation Lib "user32.dll"() As Long 

    Private Sub LockStation() 
     LockWorkStation 
    End Sub 

快乐编码。