发表评论(0)作者:, 平台:, 阅读:14851, 日期:2000-03-12
修改屏保口令
声明:
Private Declare Function PwdChangePassword Lib "mpr" Alias "
PwdChangePasswordA" _
(ByVal lpcRegkeyname As String, ByVal hwnd As Long, ByVal uiReserved1 As
_
Long, ByVal uiReserved2 As Long) As Long
使用:
' 出现修改屏幕保护口令的窗口
Call PwdChangePassword("SCRSAVE", Me.hwnd, 0, 0)
声明:
Private Declare Function PwdChangePassword Lib "mpr" Alias "
PwdChangePasswordA" _
(ByVal lpcRegkeyname As String, ByVal hwnd As Long, ByVal uiReserved1 As
_
Long, ByVal uiReserved2 As Long) As Long
使用:
' 出现修改屏幕保护口令的窗口
Call PwdChangePassword("SCRSAVE", Me.hwnd, 0, 0)