Concaténation sur un label

Bonjour,

je voulais juste savoir si c'est possible de faire une concaténation sur un controle quelquonque ??? J'en ai déjà eu besoin à plusieurs reprise ... Voici un exemple assez simple avec une fonction :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub MoveMenu(i As String, j As String, o As String)
If Me.Label4.BackStyle = 1 Then
    Me.Label& o.BackStyle = 1
    Me.Label& i.BackStyle = 0
    Me.Label& j.BackStyle = 0
ElseIf Me.Label5.BackStyle = 1 Then
    Me.Label& o.BackStyle = 1
    Me.Label& i.BackStyle = 0
    Me.Label& j.BackStyle = 0
ElseIf Me.Label6.BackStyle = 1 Then
    Me.Label& o.BackStyle = 1
    Me.Label& i.BackStyle = 0
    Me.Label& j.BackStyle = 0
End If
End sub

Merci ...