Sub Main
oFP = createUnoService( "com.sun.star.ui.dialogs.FilePicker" )
oFP.initialize( array(com.sun.star.ui.dialogs.TemplateDescription.FILEOPEN_SIMPLE) )
oFP.setMultiSelectionMode(True)
oFP.execute()
oDocs()= oFP.GetFiles
For i = 0 To UBound( oDocs())
sDocs = sDocs & oDocs(i) & chr(10)
Next i
msgBox sDocs
End Sub
.getFiles() ist veraltet.
.getSelectedFiles() liefert das richtige Ergebnis unabhängig davon, ob zum Öffnen und Speichern von Dokumenten die LibreOffice-Dialoge oder die Dialoge des Betriebssystems verwendet werden.