MyException - 我的异常网
当前位置:我的异常网» VB » 求救好心人!自定义按钮控件的DataBindings属性如何

求救好心人!自定义按钮控件的DataBindings属性如何添加上去

www.MyException.Cn  网友分享于:2013-12-29  浏览:19次
求救好心人!自定义按钮控件的DataBindings属性怎么添加上去?
我想在VB6.0中的一个自定义按钮控件上添加一个DataBindings属性,不知它应该是什么类型的属性,怎么写它
Public   Property   Get   DataBindings()   As   DataBindings
        Set   DataBindings   =   cmdObject.DataBindings
End   Property

Public   Property   Set   DataBindings(ByVal   NewValue   As   DataBindings)
  **       Set   cmdObject.DataBindings   =   NewValue
        PropertyChanged   "DataBindings "
End   Property

Private   Sub   UserControl_ReadProperties(PropBag   As   PropertyBag)
  Set   cmdObject.DataBindings   =   PropBag.ReadProperty( "DataBindings ")
End   Sub

Private   Sub   UserControl_WriteProperties(PropBag   As   PropertyBag)
    Call   PropBag.WriteProperty( "DataBindings ",   cmdObject.DataBindings)
End   Sub
以上代码“**”处会报错,为什么?

------解决方案--------------------
cmdObject是什么

文章评论

软件开发程序错误异常ExceptionCopyright © 2009-2015 MyException 版权所有