Documentation Center

Languages

The collection PslLanguages contains the target languages of a project. Your access this collection with PassoloApp.Languages.

This example lists all target languages of the current project:

Sub Main
  Dim prj As PslProject
  Set prj = PSL.ActiveProject
  If prj Is Nothing Then Exit Sub
  Dim i As Integer
  For i = 1 To prj.Languages.Count
    Dim lang As PslLanguage
    Set lang = prj.Languages(i)
    PSL.Output lang.LangCode
  Next i
End Sub

Because PslLanuages is a collection, the loop can be easier written as:

Dim lang As PslLanguage
For Each lang In prj.Languages
  PSL.Output lang.LangCode
Next lang