VB Code:
Private Sub DisplayNext(ByVal lbl1 As Label, ByVal lbl2 As Label, Optional ByVal lbl3 As Label = Nothing, ...)
lbl1.Visible = False
lbl2.Visible = False
If Not (lbl3 Is Nothing) Then
lbl3.Visible = False
End If
'etc...
End Sub
Private Sub Test()
DisplayNext(lblCon1, lblCon2, lblCon3,....)
End Sub
You could probably iterate through the labels in DisplayNext in a loop if you had a lot of them, or pass them in as an array. But I don't think you can take your integer parameters and append them to the rest of the label name, even if you passed them as a string instead of an integer, which is what I think you're looking for. A control's name isn't a string, so that doesn't work.