How to read out the PrT path list by using COM?

A list PrT paths needs to be created first:
Set aPrTPathList = Visum.Lists.CreatePrTPathList
aPrTPathList.SetObjects 0, 'C', routeFilter_filterAllRoutes
aPrTPathList.AddKeyColumns
aPrTPathList.AddColumn 't0'
aPrTPathList.AddColumn 'tCur'
aPrTPathList.AddColumn 'Vol(AP)'

To use these attributes in an array:
aPrTPathListArray = aPrTPathList.SaveToArray

Example:
http://vision-traffic.ptvgroup.com/faq-files/PTV_Example_ReadOutListPrTpaths.zip