Object Model Reference : Classes : T : TextWords : Properties : TextWords.Item |
Property Item(Index As Long, [Count As Long = 1]) As TextRange
Member of TextWords
The Item property returns a read-only reference to a specified word. It is the default property of the TextWords class.
The following VBA example creates paragraph text and applies bold formatting to the first word, underlines the fourth word, and fills the seventh and eighth words with red.
Sub Test() |
Dim t As Text |
Dim s As Shape |
Dim d As Document |
Set d = CreateDocument |
Set s = d.ActiveLayer.CreateParagraphText(2, 2, 8, 8, _ |
"This is an example for the TextWords Class") |
Set t = s.Text |
t.Story.Words.Item(1).Bold = True |
t.Story.Words.Item(4).Underline = cdrSingleThickFontLine |
t.Story.Words.Item(7, 2).Fill.UniformColor.RGBAssign 155, 0, 0 |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.