'Class module clsLayOutHelper
Sub Class_Globals
Dim lbl As Label
End Sub
'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize
End Sub
Public Sub CreateLabel(HostPanel As Panel, _
Text As String, _
Left As Int, Right As Int, _
Width As Int, Height As Int, _
EventName As String)
lbl.Initialize(EventName)
lbl.Text = Text
HostPanel.AddView(lbl, Left, Right, Width, Height)
End Sub