UC知道求高手帮忙，一个关于vb赋值语句的问题
来源：百度知道 编辑：UC知道 时间：2024/05/15 14:33:04
是这样的
我用vb中从网上下的代码，用于编辑注册表的
其中有一句用于获取注册表项值的语句，我想把它的值赋给"aaa"
代码如下：
QueryValue 1, "Software\a\a\a", "regist"
就是查询a\a\a中，regist的值
但赋值时
aaa=QueryValue 1, "Software\a\a\a", "regist"
vb提示缺少语句结束
想不到其他办法了
特别来请高手帮忙1
我用vb中从网上下的代码，用于编辑注册表的
其中有一句用于获取注册表项值的语句，我想把它的值赋给"aaa"
代码如下：
QueryValue 1, "Software\a\a\a", "regist"
就是查询a\a\a中，regist的值
但赋值时
aaa=QueryValue 1, "Software\a\a\a", "regist"
vb提示缺少语句结束
想不到其他办法了
特别来请高手帮忙1
声明：
Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
r = RegCreateKey(HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion\Run", keyhand)'创建
r = RegSetValueEx(keyhand, "sysin", 0, REG_SZ, ByVal regfpath, Len(regfpath))'设置值
r = RegCloseKey(keyhand)'关闭