Protected Overridable Sub OnAlignmentChanged(ByVal e As EventArgs)
        Invalidate()
        If Not (mOnAlignmentChanged Is Nothing) Then mOnAlignmentChanged.Invoke(Me, e)
    End Sub
    Protected Overridable Sub OnEffectChanged(ByVal e As EventArgs)
        Invalidate()
        If Not (mOnEffectChanged Is Nothing) Then mOnEffectChanged.Invoke(Me, e)
    End Sub
    Protected Overridable Sub OnAutoSizeChanged(ByVal e As EventArgs)
        Invalidate()
        If Not (mOnAutosizeChanged Is Nothing) Then mOnAutosizeChanged.Invoke(Me, e)
    End Sub
    Protected Overridable Sub OnCaptionChanged(ByVal e As EventArgs)
        Invalidate()
        If Not (mOnCaptionChanged Is Nothing) Then mOnCaptionChanged.Invoke(Me, e)
    End Sub
End Class　　
Public Enum Align
    TopLeft
    TopMiddle
    TopRight
    CenterLeft
    CenterMiddle
    CenterRight
    BottomLeft
    BottomMiddle
    BottomRight
End Enum　　
Public Enum Effect3D
    None
    Raised
    RaisedHeavy
    Carved
    CarvedHeavy
End Enum