Obtenez la légende de l'étiquette associée à un contrôle de formulaire - Access 2007

Question

Comme le titre l'indique, je suis en train d'obtenir la légende de l'étiquette associée pour les contrôles de formulaire par exemple:

Dim ctl As Control 
Dim errMess As String 
errMess = "" 
For Each ctl In frm 
    With ctl 
      If (ctl.Tag = "*") Then 
     errMess = errMess & ctl.Caption & vbNewLine   
      End If 
     End If 
    End With 
Next ctl 

Il est évident que « ctl. Légende "ne fonctionne pas, je ne suis pas sûr de savoir comment faire référence à cela.

Toute aide appréciée.

Vive

Noel

Answer 1

trouvé la réponse consiste à utiliser ctl.Controls.Item (0) .Caption

Dim ctl As Control 
Dim errMess As String 
errMess = "" 
For Each ctl In frm 
    With ctl 
      If (ctl.Tag = "*") Then 
     errMess = errMess & ctl.Controls.Item(0).Caption & vbNewLine   
      End If 
     End If 
    End With 
Next ctl