在 Regwrite 行中插入变量值

Question

您好，我有一个名为 VAR1 的变量，我需要将变量值插入到我的注册表项中，其中显示 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，请查看网络上已有的有关如何执行此操作的众多示例之一。 例如。或者查看关于SO的许多重复问题之一。