在Regwrite行中插入变量值

Question

嗨我有一个变量名为VAR1的变量我需要在我的regkey中插入变量值，其中140  我该怎么做....

    Private Sub OKAY_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OKAY.Click

    Dim wshshell

    wshshell = CreateObject("WScript.Shell")
    wshshell.RegWrite("HKLM\SOFTWARE\Microsoft\windows\CurrentVersion\policies\Explorer\NoDrives", 140, "REG_DWORD")

End Sub

Answer 1

当您可以使用框架时，请不要使用wshshell，请查看已在网络上执行此操作的众多示例之一。 For instance。或者查看许多重复问题之一on SO。