tt = "Sub trans" & vbCrLf & "strA=1" & vbCrLf & "strB=strA" & vbCrLf & "msgbox strB" & vbCrLf & "End Sub"
ScriptControl1.language = "VBScript"
ScriptControl1.addcode tt
ScriptControl1.run "trans"
你说的 strA和 strB都是vb6内定义的全局变量？ 如果是， script是无法改变其值
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024