为什么这段代码过不去呢

vincenthan

Dim a1,a2,a3,s
Set a1=createobject("scripting.filesystemobject")
Set a3=createobject("wscript.shell")
s=a3.specialfolders("desktop")
Set a2=a1.opentextfile(s&"\new.txt",2,true)
a2.writeline "the hex is'"&hex(98)&"'"
a2.close
总是停在倒数第2行代码，但我把hex(98)先赋值给一个变量,改过来就可以通过，想不通是为什么，希望指点一下

vincenthan

sdlkfj8 真的通过了，不过是为什么呢？有谁能告诉我吗，因为我一直这样写其他的函数都没有问题，为什么唯独HEX出现这样的问题呢？大惑不解sdlkfj7

sterson

Dim a1,a2,a3,s
Set a1=createobject("scripting.filesystemobject")
Set a3=createobject("wscript.shell")
s=a3.specialfolders("desktop")
Set a2=a1.opentextfile(s&"\new.txt",2,true)
a2.writeline "the hex is'"& hex(98) &"'"
a2.close
在我的电脑是通过的,倒数第二句 a2.writeline "the hex is'"& hex(98) &"'"
在&符号前后都要打上空格就行了.