中国DOS联盟

dim wsh
set wsh=createobject("wscript.shell")
wsh.regread ("HKEY_CLASSES_ROOT\qqw\abcd")

这样可以读到ABCD的键值


dim wsh
set wsh=createobject("wscript.shell")
aa="1234"

dg aa = bb

msgbox bb '无法打开注册键值"HKEY_CLASSES_ROOT\qqw\False“进行读取

function dg(yy)
wsh.regread ("HKEY_CLASSES_ROOT\qqw\"&yy)
end function

要怎样改哦

子程序没错啊，调用错了，应当是：
bb=dg(aa)

这样好像也不是啊。弹出来是个空MSGBOX

疏忽了。

dim wsh

set wsh=createobject("wscript.shell")

aa="1234"



bb=dg(aa) 



msgbox bb

function dg(yy)

dg=wsh.regread ("HKEY_CLASSES_ROOT\qqw\"&yy)

end function

你的函数没有返回值。。。。

Function dg(yy)
dg = wsh.regread("HKEY_CLASSES_ROOT\qqw\" & yy)
End Function