有关自写控件的问题

Question

如何讓自寫控件的Caption初始值與其Name的初始值相同.好比你在窗體上引用多個標簽,其Caption屬性會自動設為Label1,Label2,Label3.....

Answer 1

在usercontrol_initialize事件中定制。

Answer 2

private sub usercontrol_initialize()
  usercontrol.caption=usercontrol.name
end sub

Answer 3

private sub usercontrol_initialize()
  usercontrol.caption=usercontrol.name
end sub

Answer 4

但这些都只能返回设计时的名称,比如设计时为MLabel,窗体上引用此控件时的名称为MLabel1,MLabel2,MLabel3,但其Caption属性却永远为MLabel,并未与Name同步.

Answer 5

Private Sub UserControl_InitProperties()
  m_Caption = UserControl.Name
End Sub

Answer 6

Private Sub UserControl_InitProperties()
  m_Caption =Extender.Name
End Sub