Visual Basic para Aplicaciones - Pasar un label como argumento a un procedimiento

Buenas a todos. Tengo una duda que no consigo resolver.
Necesito pasar varios controles label a un procedimiento para que les cambie
algunas propiedades pero no lo consigo. Como se puede pasar un control del
tipo que sea a un procedimiento?.

Gracias y un saludo.
Antonio.

Private Sub CommandButton1_Click()
modif_label Label1
End Sub

Sub modif_label(ByRef la As MSForms.Label)
la.Caption = "jaja"
End Sub

Saludos desde Baires, JuanC

EN UN FORM AGREGA UN LABEL Y UN COMMMANDBUTTON Y AGREGA EL SIGUIENTE CODIGO Y CHECA EL RESULTADO

Private Sub Command1_Click()
Cambia Label1
End Sub

Private Sub Cambia(XObjeto As Label)
XObjeto.Caption = "CAMBIO"
XObjeto.BackColor = vbRed
XObjeto.Font = "ARIAL"
XObjeto.Top = 3000
XObjeto.Left = 500
End Sub

ESPERO TE SIRVA, SALUD2