在VB程序将字符串转为VB代码执行

Question

dim aa as String 
aa="call bb()" 
请问如何让aa里的内容被执行 

Answer 1

参考: http://topic.csdn.net/t/20040610/13/3080342.html

Answer 2

Private Sub Command1_Click()
Text1.Text="bb"
ScriptControl1.Reset 
Call ScriptControl1.AddCode(Text1.Text) 
End Sub 
Private Sub bb() 
MsgBox "asasdasd" 
End Sub 
为什么一加子程序，就出现类型不匹配问题  
 
 

Answer 3

Private Sub Command1_Click()
Text1.Text = "bb"
CallByName Form1, Text1.Text, VbMethod
End SubPublic Function bb()
MsgBox "asasdasd"
End Function

Answer 4

Private Sub Command1_Click() 
Text1.Text = "bb" 
CallByName Form1, Text1.Text, VbMethod 
End Sub Public Function bb()   '一定要注意,此处要用 Function .不能用 Sub
MsgBox "asasdasd" 
End Function 因此,你用控件可以也是相同的原因,如果你改为 Function应该会好的.

Answer 5

感谢fvflove,终于不解决的办法了！！！