Documentation Center

PassoloApp.GetConcordances

Returns a list of concordances for one string. The function will search through all concordance providers as set up in the Passolo options. But, in contrast to the Passolo application this function only uses translation providers that are capable of return synchronous results.

Syntax

Expression.TranslateText (Text as String ,LanguageFrom as Variant, LanguageTo as Variant, MinMatch as Variant, MaxCount as Variant) as PslTranslations

Expression Required. Object of type PslTransList

Text String, Required. Concordances of this string are searched.

LanguageFrom Required. The source language for the translation. Specify the language by its ID (1033 for English(USA)) or by its name ("enu")

LanguageTo Required. The source language for the translation

MinMatch Variant, optional. Specifies the minimum match required. The default value is 100, so that the function searches for exact matches by default.

MaxCount Variant, optional. Specifies the maximum number of segments to be returned.

Example

Sub Main
    ' Clear the output window
    PSL.OutputWnd(pslOutputWndMessages).Clear


    Dim ts As PslTranslations
    Dim t As PslTranslation

    ' Concordances
    PSL.Output("Concordances-------------------")
    Set ts = PSL.GetConcordances("Open", 1033, 1031, 100)

    For Each t In ts
        PSL.Output t.TransString & " (" & t.Origin & ")"
    Next
End Sub