首页 / 帮助中心 / 正文

帮助中心

VB-获取函数地址的小窍门
来源:飘零网络 | 发布时间:2014-3-6
  用Addressof语句可以获取函数地址,这个地球人都知道,但是切记,不能把Addressof当做一个函数来使用,Addressof只能用在某函数的参数里,否则会提示“操作符的使用不正确”或者“缺少表达式”。

如下的使用方法是错误的。

Dim funcaddr As Long

funcaddr = addressof(MyFunc)

    那么,怎么直接获取函数地址呢,前面说了,Addressof可以作为函数的参数,那么我们可以写一个函数,返回指定函数的地址。

Private Sub Command1_Click()
    Dim funcaddr As Long
     funcaddr = GetAddr(AddressOf MyFunc)
End Sub

Public Function MyFunc(a, b) As Long
     MyFunc = a + b
End Function

Public Function GetAddr(ByVal addr As Long) As Long
     GetAddr = addr
End Function

    注意,Addressof后面的函数(MyFunc)必须是Public声明的,不能是Private,GetAddr函数无所谓。到此为止。

 

  • 飘零网络技术支持QQ群:
  • 诺易、①:52805016(已满)
  • 诺易、②:52806321(未满)
  • 诺易、③:52805561(已满)
  • 诺易、④:52805908(已满)
  • 诺易、⑤:54496044(已满)
  • 诺易、⑥:158766792(已满)
  • 诺易、⑦:134202750(已满)
  • 诺易、⑧:181423535(已满)
  • 诺易、⑨:89758906(已满)

关于飘零网络 | 主机管理 | 合作伙伴 | | | 飘零网络免责声明
Copyright © 2010-2018 闽ICP备12003655号·保留所有权利