|
#2
风吹过b2014-11-19 11:11
|
请教各位：
我知道一个变量的名称，想把它赋值给另一个变量。比如我知道一个Variant变量的名称为"VarA"(我程序里面有数十个类似的Variant数组，不太方便用Select Case)，我想把VarA赋值给VarB.请问该如何做呢？
我试图用scriptcontrol，单一直无法完成赋值，
dim rr,ss as variant
rr="CCC"
scriptcontrol1.language="VBScript"
scriptcontrol1.executestatement "ss=rr"
结果ss的值仍为Empty。rr和ss的变量声明我从局部变量、模块变量和全局变量都用过，但均无效。
请问该如何解决呢？
使用VBA6中的EbExecuteLine在调试时一切正常，但编译后无法运行。
烦请各位指点。