VB 可以使用组策略吗？ 加分！

绝对可以，下面程序因为放在这里格式上会有错误，你不能直接复制过去，要更改一下（比如RegCreateKey后面的内容要紧跟，不能放在下一段）。修改组策略其实就是修改注册表，而Vb修改注册表是很简单的，怎么会不行呢?
比如组策略里面有个“不要保留最近打开的文档记录”，实际上用Vb修改注册表很容易实现。如下；

Private Sub Command1_click() '不要保留最近打开的文档记录
Dim hKey As Long

RegCreateKey HKEY_CURRENT_USER, "Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", hKey

Dim str As Integer
str = MsgBox("保留最近打开的文档记录？", 3, "提示")
If str = vbCancel Then
Exit Sub
ElseIf str = vbYes Then

RegSetValueEx hKey, "NORECENTDOCSHISTORY", 0, REG_DWORD, 1, 4
MsgBox "成功设置不保留最近打开的文档记录(注销后生效)", 64, "提示"
Else

RegSetValueEx hKey, "NORECENTDOCSHISTORY", 0, REG_DWORD, 0, 4
MsgBox "成功设置保留最近打开的文档记录(注销后生效)", 64, "提示"
End If
End Sub
其他组策略的功能你只要知道它修改了注册表哪里然后修改它就Ok了，我就是这么做的软件，超简单