我肯定是你的事件没有触发! 你在以下代码中设置断点,看能不能运行中断: Public Sub List2_ItemCheck(Item As Integer) '触发点击事件,返回当前选中项的值 RaiseEvent BkMkSelect'设置断点,如果事件有触发,当你设置项目打钩,则运行到该处,应该进入调试状态 End Sub
如果能,那么,你的 Public WithEvents BkMkselect As WdCtl.WdOcx 中的 BkMkselect 没有创建对象,肯定是nothing
是的DLL调用OCX的代码如下: 引用OCX后,在类模块里面调用. Public WithEvents BkMkselect As new WdCtl.WdOcx
...New创建一个新的实例化对象,但是对OCX不行.
ocx是控件吧....控件就有实例的吧.在dll里面定义了控件,却没有实例..Public WithEvents BkMkselect As WdCtl.WdOcx,没有new啊同时控件显示在什么地方?控件都没有显示,控件里面的子控件怎么触发事件,没法点击呀 Public Sub List2_ItemCheck(Item As Integer) '触发点击事件,返回当前选中项的值要不你直接在控件里面指定个timer,到时间了RaiseEvent BkMkSelect下看看...
注意:List2_ItemCheck应该是在设置项目打钩时触发,不知道,你是否设置显示打钩
你是否使用错了事件:List2_ItemClick?
我肯定是你的事件没有触发!
你在以下代码中设置断点,看能不能运行中断:
Public Sub List2_ItemCheck(Item As Integer) '触发点击事件,返回当前选中项的值
RaiseEvent BkMkSelect'设置断点,如果事件有触发,当你设置项目打钩,则运行到该处,应该进入调试状态
End Sub
Public WithEvents BkMkselect As WdCtl.WdOcx
中的
BkMkselect 没有创建对象,肯定是nothing
引用OCX后,在类模块里面调用.
Public WithEvents BkMkselect As new WdCtl.WdOcx
...New创建一个新的实例化对象,但是对OCX不行.
Public Sub List2_ItemCheck(Item As Integer) '触发点击事件,返回当前选中项的值要不你直接在控件里面指定个timer,到时间了RaiseEvent BkMkSelect下看看...