PslTransString.GetTextCounts
Counts Words, letters and characters in the translation text of this string. The count results are stored in the returned PslStringCounter object.
Syntax
Expression.GetTextCounts() as PslStringCounter
Expression Required. Object of type PslTransString
Example
Sub CompareWordCount(t As PslTransString)
Dim srccount As PslStringCounter
Set srccount = t.GetSourceTextCounts()
Dim trncount As PslStringCounter
Set trncount = t.GetTextCounts()
Dim diff As Integer
diff = trncount.WordCount - srccount.WordCount
PSL.Output "Change in word count: " & CStr(diff)
End Sub