VB 函数 CallByName 的一些用法 (函数动态调用,回调函数)

实例 同时被 3 个专栏收录
3 篇文章 0 订阅
11 篇文章 0 订阅
29 篇文章 0 订阅

VB  函数  CallByName (函数动态调用,回调函数) 的一些用法

  最近编程,要用到函数指针来动态地调用函数,在C 语言里很容易实现,用函数指针就行了。

  VB里就没有这么方便了,查阅相关资料,讲起来均很复杂,也不容易明白,其中采用CallByName (函数动态调用,回调函数)是最方便的方法。

  将之归纳为几个例子,应用方法就一目了然了。

 

 

Private Sub Command2_Click()
    Dim Args(1) As String

    Args(0) = "0a"
    Args(1) = "1b"
    
    CallByName Me, "SubBy1", VbMethod, "00aa", "11bb"
    Form1.Label1 = (CallByName(Me, "FunBy2", VbMethod, Args(0), Args(1)))
 
    CallByName Text1, "Text", VbLet, "New Text"            '设置属性
    Text1.Text = " rst=" + CallByName(Text1, "Text", VbGet)  '读属性
    CallByName Text1, "Move", VbMethod, 100, 100, 2000, 500    'move方法
End Sub
Sub SubBy1(s1 As String, s2 As String)
    Debug.Print s1 + "  Sub1  " + s2
End Sub
Function FunBy2(s1 As String, s2 As String) As String
    FunBy2 = "Test2 :  " + s1 + " Fun 2 " + s2
End Function


 

附:

Visual Basic 语言参考


CallByName 函数

执行对象的方法,或者设置或返回对象的属性。

Public Function CallByName( _
   ByVal ObjectRef As System.Object, _
   ByVal ProcName As String, _
   ByVal UseCallType As CallType, _
   ByVal Args() As Object _
) As Object
参数
ObjectRef
必选。Object。指向公开属性或方法的对象的指针。

ProcName
必选。String。包含对象的属性名或方法名的字符串表达式。

UseCallType
必选。CallType 枚举类型的枚举成员,表示所调用过程的类型。CallType 的值可以是 Method、Get 或 Set。

Args
可选。ParamArray。参数数组,包含要传递给所调用的属性和方法的参数。


  • 1
    点赞
  • 0
    评论
  • 7
    收藏
  • 打赏
    打赏
  • 扫一扫,分享海报

表情包
插入表情
评论将由博主筛选后显示,对所有人可见 | 还能输入1000个字符
©️2022 CSDN 皮肤主题:大白 设计师:CSDN官方博客 返回首页

打赏作者

whchensir

你的鼓励将是我创作的最大动力

¥2 ¥4 ¥6 ¥10 ¥20
输入1-500的整数
余额支付 (余额:-- )
扫码支付
扫码支付:¥2
获取中
扫码支付

您的余额不足,请更换扫码支付或充值

打赏作者

实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、C币套餐、付费专栏及课程。

余额充值