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.