ocr: ControlDemo - ShapeLabel X (General) (Declarations) option Explicit HTtIET AXE X SEFFBT Public Event Click() Et Mizt19tt, HRE L Tt J FF Private Sub lancaption Click() Raisetvent Click End Sub FRIL X F à UserControlREo Priv E LontrolDemo - ShapeLabel (Userc...-0 JX End Labell L FT 839500248A780A Priv 36PIZTH API LEH, E EE UserControl BJRJ REE, XH E3i End HXTIN, PLF PEPTISO Priv s integel hen End If End Sub 474 I HEJ UserControl Private Sub UserControl Readrroperties (PropBag As BERESTOTS vebug.Print "ReadProperties" Caption = PropBag.ReadProperty("Caption", Extender.Name)
(.png)
