运用函数指针的方法

jerryshomaro

Class Node
   Public Onload
End Class

Function GetRefTest1()
   msgbox "hello11111"
End Function
Function GetRefTest2()
  msgbox "hello22222"
End Function
Set mm = new Node
Set mm.Onload = GetRef("GetRefTest1")
Call mm.ONload
Set mm.Onload = GetRef("GetRefTest2")
Call mm.ONload

大家可以试试。

风过无息

这个有什么用呢?

mstiunicon

虽然还没有想到要用在什么地方，不过直觉这个功能会比较好用，在实现一些功能时，又多了一个选择。