你的委托跟basemainform有什么关系？直接用啊
Dim ValArr() As object = {1,2}Dim TDG As New TestDG(Addressof _TestDG) '实例化委托tdg.Invoke(ValArr) '执行委托
加好友 
发短信
Post By：2015/1/19 14:14:00 [只看该作者]
