英文简写规则:关于WORD宏的一个问题

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 16:38:53
现在想用WORD宏来对注册表解锁,不知道能行不

Word也可以给注册表解锁 利用的是微软在Word中提供的“宏”,具体方法是:运行Word,然后编写如下面所示的这个“Unlock”宏,即可给注册表解锁:

Sub Unlock()
Dim RegPath As String
RegPath = “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System”
System.PrivateProfileString(FileName:=“”,Section:=RegPath,Key:=“Disableregistrytools”)=“OK!”
End Sub

Sub Unlock()
Dim RegPath As String
RegPath = “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System”
System.PrivateProfileString(FileName:=“”,Section:=RegPath,Key:=“Disableregistrytools”)=“OK!”
End Sub