事件源中执行raiseevent Test()
在客户程序(即接收事件的地方)的类模块或者窗体模块中,定义
dim withevents Test1 as CTestprivate sub Test1_Test()
msgbox "接收到测试事件!"
end sub
在客户程序(即接收事件的地方)的类模块或者窗体模块中,定义
dim withevents Test1 as CTestprivate sub Test1_Test()
msgbox "接收到测试事件!"
end sub
调试欢乐多
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货