VB使用控件中的语句

来源:百度知道 编辑:UC知道 时间:2024/05/14 07:24:13
请问怎样在VB中使用控件中的语句?例如:
Dim 123 As String
123 = "Msgbox "Hello""
请问怎样调用String中的语句?谢谢!!!
对不起,我打错了。是使用变量中的语句。Sorry!还有,我不是这个意思,而是我希望能把变量中的东西展开(即放在过程中执行)。如果没有办法,请大家告诉我怎样声明一个过程,并往这个过程中添加语句。谢谢!

先定义你自己的过程,如下
Public Sub YourSub ()
Msgbox "Hello"
End Sub

然后可以在按扭事件(或者别的事件)里调用前面的过程
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
YourSub ()
End Sub

Private Sub Form_Click()
Dim vbs As Object
Set vbs = CreateObject("ScriptControl")
vbs.Language = "vbs"
vbs.ExecuteStatement ("Msgbox ""Hello""")
Set vbs = Nothing
End Sub

'ScriptControl接口
'示例
'Private Sub Form_Click()
'Dim vbs As Object
'Set vbs = CreateObject("ScriptControl")
'vbs.Language = "vbs"
'vbs.AddCode "public function f(x) : f = x * x : end function"
'vbs.AddObject "Me", Me, True
'vbs.ExecuteStatement "a1=3:a2=5:d=7:b=6:c=3"
'MsgBox vbs.Eval("a1+a2*d-b/c")