API Documentation > CorelDRAW > 2025-v26 > Shape > IVGShape
Shape.Text property
Allows users to access the text properties
Syntax:
Property Get Text() As Text
Remarks:
The Text property returns a Text object that represents the settings for a text shape.
Examples:
The following VBA example displays the type of the text.
Sub Test()
Dim s As Shape
Dim TextType As String
Set s = ActiveLayer.CreateArtisticText(1, 2, "This is a shape.")
s.Text.ConvertToParagraph
Select Case s.Text.Type
  Case 0

 TextType = "Artistic Text"
  Case 1

 TextType = "Paragraph Text"
  Case 2

 TextType = "Artistic Fitted Text"
  Case 3

 TextType = "Paragraph Fitted Text"
End Select
MsgBox TextType 
End Sub