[Resolvido]Retornar o nome do rótulo do campo

Olá pessoas!
Conforme código abaixo cedido gentilmente pelo colega JPaulo, gostaria de saber se existe uma possibilidade de retornar o nome do rótulo do controle, uma vez que irei condicionar quais serão os campos obrigatórios na propriedade 'tag'. Lembrando que usaremos a propriedade 'tag' com um parâmetro para defenir quais serão os campos obrigatórios para preenchimento.

Código:

Public Function ValidaPreenchimento() As Boolean
'By JPaulo :registered: Maximo Access
Dim ctl As Control
For Each ctl In Me.Controls
If ctl.ControlType = acTextBox Then
If IsNull(ctl.Value) Then
MsgBox "O Campo '" & ctl.Tag & "' não pode ficar em branco"
ctl.SetFocus
Exit Function
End If
End If
Next
End Function

Private Sub SeuBotão_Click()
Call ValidaPreenchimento
End Sub

'Segue o código editado: ..................................

Public Function ValidaPreenchimento() As Boolean
Dim ctl As Control
For Each ctl In Me.Controls
If ctl.ControlType = acTextBox Then
If IsNull(ctl.Value) and ctl.Tag= 1 Then
' MsgBox "O Campo '" & ctl.nome_do_rotulo & "' não pode ficar em branco"
ctl.SetFocus
Exit Function
End If
End If
Next
End Function

Private Sub SeuBotão_Click()
Call ValidaPreenchimento
End Sub

O assunto e a solução já existem no tópico abaixo
https://www.maximoaccess.com/t37229-resolvidoexibir-nome-do-rotulo-do-campo-associado

Solução atende perfeitamente, muito obrigado!

O fórum agradece o retorno. Sucesso.