如何使用VBA锁定计算机

Question

如何使用excel VBA锁定计算机？以防万一，"锁定计算机"是指当您执行"开始菜单-->关闭-->锁定"时的效果相同。

Answer 1

对于 x64 位：

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

快乐编码。