| 
       | 
        
       | Object Model Reference : Classes : T : Text : Properties : Text.Story  | 
      
Property Story As TextRange
Member of Text
The Story property returns all text from all text frames.
The Story property returns a read-only value.
The following VBA example creates artistic text and displays all of the text.
Sub Test()  | 
 Dim d As Document  | 
 Dim s As Shape  | 
 Dim t As Text  | 
 Set d = CreateDocument  | 
 Set s = d.ActiveLayer.CreateArtisticText(3, 3, "This is a test.")  | 
 Set t = s.Text  | 
 MsgBox "The entire text is:" & vbCr & t.Story  | 
End Sub  | 
| 
       | 
        
       | 
		      
		          
		             | 
      
Copyright 2013 Corel Corporation. All rights reserved.