自定义按钮的文字问题
VB6自定义了一个控件,想做成一个按钮,内含一个Label和一个shape.在程序中引用后,我想能随时更改label的caption属性,所以添加了下面的属性
Public Property Let lbltxt(ByVal Value As String)
Label1.Caption = Value
End Property
Public Property Get lbltxt() As String
lbltxt= Label1.Caption
End Property
但又发现一个问题:如果我在form中使用了这个按钮,并改变了lbltxt的值,可是当我编辑一下这个自定义控件后,form上的所有按钮lbltxt就变回原始值label1,这该怎么办
[解决办法]
本来就是这样的啊,你"编辑一下这个自定义控件",相当于从那个form上移去了控件,然后重新放了一个
[解决办法]
#1楼不是已经回答了么?
先做好了控件再使用,别在使用的时候再去改
怎么办?用代码设置属性就没这问题了