See this page for a breakdown on vb.net printing methods:
To get the text out of all your labels, use this code:
For Each ctrl As Control In Me.Controls
If TypeOf (ctrl) Is Label Then
Dim newLine As String = ctrl.Name & ": " & ctrl.Text
'Process newLine as you see fit
End If
Next
solved Printing all Labels in a Form VB.net