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