'Declaration
Public Function New( _
ByVal As IImGearRectangle, _
ByVal As String, _
ByVal As IImGearRGBQuad, _
ByVal As String, _
ByVal As Single, _
ByVal As ImGearARTFontStyles, _
ByVal As IImGearRGBQuad _
)
'Usage
Dim rect As IImGearRectangle
Dim text As String
Dim textColor As IImGearRGBQuad
Dim fontName As String
Dim fontSize As Single
Dim fontStyle As ImGearARTFontStyles
Dim pinColor As IImGearRGBQuad
Dim instance As New ImGearARTPinUpText(rect, text, textColor, fontName, fontSize, fontStyle, pinColor)