比如字符串
strTest="变量1"我想做如下操作
变量1="nnnnnnnnnn"可是“变量1”却存储在strTest中
请问如何从strTest中,为“变量1”赋值?

解决方案 »

  1.   

    引用“Microsoft Script Control 1.0”
    Private Sub Command1_Click()
        Dim VBEval As New ScriptControl
        Dim strTestAs String    VBEval.Language = "vbscript"
        strTest="变量1"
       变量1="nnnnnnnnnn"
        aaa= VBEval.Eval(strTest)
        MsgBox aaa
        Exit Sub
    End Subaaa 为nnnnnnnn
      

  2.   

    VBScript 中可以, VB 中不行。
      

  3.   

    楼上够经典 我弄了好久 都出错引用“Microsoft Script Control 1.0”
    Private Sub Command1_Click()
        Dim VBEval As New ScriptControl
        Dim strTestAs String    VBEval.Language = "vbscript"
        strTest="变量1"
       变量1="nnnnnnnnnn"
        aaa= VBEval.Eval(strTest)
        MsgBox aaa
        Exit Sub
    End Sub请教楼上 这么调用 没错吧 为什么 告诉自动化错误
      

  4.   

    楼主帮不了你了 :( 
    我以前也遇到过去查了N多资料  
    http://community.csdn.net/Expert/topic/4143/4143526.xml?temp=.4135248
    最后 办法用用户自定义类型解决的