| 
       | 
        
       | Object Model Reference : Classes : T : TextRange : Properties : TextRange.WideText  | 
      
Property WideText As String
Member of TextRange
The WideText property returns or specifies a Unicode text string for a text range.
The following VBA example creates two Japanese characters by using their character codes, and it then appends the same two characters to the text string.
Sub Test()  | 
 Dim t As Text  | 
 Dim s As Shape  | 
 Dim d As Document  | 
 Set d = CreateDocument  | 
 Set s = d.ActiveLayer.CreateParagraphTextWide(2, 2, 8, 8, _  | 
  ChrW$(-32022) & ChrW$(-32072), cdrJapanese, cdrCharSetShiftJIS, _  | 
  Font:="MS Gothic")  | 
 Set t = s.Text  | 
 t.Story.InsertAfterWide " " & t.Story.WideText  | 
End Sub  | 
| 
       | 
        
       | 
		      
		          
		             | 
      
Copyright 2013 Corel Corporation. All rights reserved.