VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
  Persistable = 0  'NotPersistable
  DataBindingBehavior = 0  'vbNone
  DataSourceBehavior  = 0  'vbNone
  MTSTransactionMode  = 0  'NotAnMTSObject
END
Attribute VB_Name = "clsLabelExAttributes"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_Ext_KEY = "SavedWithClassBuilder6" ,"Yes"
Attribute VB_Ext_KEY = "Top_Level" ,"Yes"
Option Explicit

Public Caption As String

Public ForeColor As Long
Public FontName As String
Public CharHeight As Single
Public CharWidth As Single
Public Angle As Long
Public CharWeight As Long
Public FontItalic As Boolean
Public FontUnderline As Boolean
Public FontStrikeOut As Boolean

Public PositionIsAbsolute As Boolean
Public Left As Single
Public Top As Single
Public Bottom As Single
Public Right As Single
Public CellSpacing As Single

Public FillStyle As FillStyleConstants
Public FillColor As Long
Public BorderWidth As Integer
Public BorderColor As Long

Public WordWrap As Boolean
Public Align As TextAlignConstants

Public Tag As String

Private Sub Class_Initialize()
    FillColor = vbBlack
    FillStyle = vbFSTransparent
    ForeColor = vbBlack
    FontName = defFontName
    CharHeight = defFontSize
    BorderColor = vbBlack
    CellSpacing = 0
End Sub
