LibreOfficeで印刷する

Dim properties(1) as new com.sun.star.beans.PropertyValue
properties(0).Name = "CopyCount"
properties(0).Value = 2
properties(1).Name = "Collate"
properties(1).Value = True
ThisComponent.print(properties)