How can I display relations in an active sketch like this...

I'm using:

vSkRelArr As New Object

vSkRelArr = swSkRelMngr.GetRelations(swSketchRelationFilterType_e.swAll)

For Each vRel As SketchRelation In vSkRelArr

vRel.GetRelationType

Next

I can get the relation type but how do i get the relation name? eg. "Perpendicular111"

I'm on SolidWorks 2012 SP5.0

thanks