PslTransString.ID
Returns the ID of the string. The ID can either be a numerical value or a string.
Syntax
Expression.ID as Variant
Expression Object of type PslTransString
Dim s As PslSourceString
...
Dim id as Long
id = s.ID
If s.Resource.Type = "StringList" Then
id = 16 * (s.Resource.ID - 1) + s.ID
Else
id = s.ID
End If