Documentation Center

PslSourceList.FindID

Returns a PslSourceString with a given ID.

Syntax

Expression.FindID (ID as VARIANT, Index as Long) as PslSourceString

Expression Object of type PslSourceList

ID The ID you're looking for

Index Set to 1 to find the first token with ID. Increase the number to find following tokens with that ID.

Example

' Find all source strings with the ID 100
Dim src As PslSourceList
Set src = PSL.ActiveSourceList
If Not src Is Nothing Then
    Dim s As PslSourceString
    Dim index As Long
    index = 1
    While True
        Set s = src.FindID(100, index)
        If s Is Nothing Then Exit While
        PSL.Output Str(s.Number)
        index = index + 1
    Wend
End If