在VBA中,采用call 过程名 来调用一个过程或函数,能否把过程名或函数名放在一个字符串变量中,来间接调用。例如就像在C语言中将函数名赋给一个函数指针那样。
解决方案 »
- VB-求教按键检测问题
- 小弟想放一幅大图片到Picture,因为图太大,无法看全小弟想放一个垂直滚动条,但不知道如何和图片框绑定,请大家指点.
- 难难难!!!DATAGRID各行按内容不同显示不同的颜色.
- picturebox 的背景中输出文字,文字可以编辑(字体,颜色。。。删除。。。)
- 难道这里真的没有高手??
- 读取Excell数据
- sql server2000 个人版哪里有得下?
- 小弟论坛开张了,请大家有空去坐坐阵!(注:是动网论坛,小弟无能力自己编)
- VB连接数据库时出现"实时错误442",请问如何解决?
- 高手请指教,如何从网站提取数据,并定时刷新。谢谢!
- VB6+ACCESS 在事务控制中为什么两条语句不可同时执行
- VB6.0编写系统登录代码时遇到“实时错误3021”
' === 类模块代码 ===
' 类名改为: claMain
Option ExplicitPublic Sub Test(param As Long)
MsgBox "你传入的参数是:" & param, 64, "OK!"
End Sub' === 窗体代码 ===
Option ExplicitPrivate Sub Command1_Click()
Dim strFun As String
Dim objTest As claMain
Set objTest = New claMain
strFun = "Test"
CallByName objTest, strFun, VbMethod, 25
Set objTest = Nothing
End Sub
Option ExplicitPublic Function test(a As Long) As Long
test = a + 10
End FunctionPrivate Sub Command1_Click()
Dim y As Long
y = CallByName(Me, "test", VbMethod, 10)
Print y
End Sub
-_-!!!
Private Sub Command1_Click()
Dim p As String
Script.AddCode "x = " & Text2.Text
p = format(Script.Eval(Text1.Text)) //可以把字符串解析成命令
End Sub