Propiedad SubForm.Tag (Access)
Almacena información adicional acerca de un formulario, informe, sección o control necesarios para una aplicación de Microsoft Access. String de lectura y escritura.
Sintaxis
expresión. Etiqueta
Expresión Variable que representa un objeto SubForm .
Comentarios
Puede escribir una expresión de cadena de hasta 2048 caracteres de longitud. El valor predeterminado es una cadena de longitud cero ("").
A diferencia de otras propiedades, el valor de la propiedad Tag no afecta a ninguno de los atributos del objeto.
Utilice esta propiedad para asignar una cadena de identificación a un objeto sin afectar a ninguna otra configuración de propiedad ni provocar otros efectos secundarios. La propiedad Tag es útil cuando se necesita comprobar la identidad de un formulario, informe, sección o control que se pasa como una variable a un procedimiento.
Ejemplo:
En el siguiente ejemplo se utiliza la propiedad Tag para mostrar mensajes personalizados acerca de los controles en un formulario. Cuando un control tiene el enfoque, se muestra un texto descriptivo en un control de etiqueta denominado lblMessage. Especifique el texto del mensaje estableciendo la propiedad Tag de cada control en una cadena de texto breve. Cuando un control recibe el enfoque, se asigna su propiedad Tag a la propiedad de título de la etiqueta del control.
En este ejemplo se muestra el texto descriptivo de un cuadro de texto denominado txtDescription y un botón de comando denominado cmdButton en un formulario.
Sub Form_Load()
Dim frmMessageForm As Form
Set frmMessageForm = Forms!Form1
frmMessageForm!lblMessage.Caption = "" ' Clear text.
frmMessageForm!txtDescription.Tag = "Help text for the text box."
frmMessageForm!cmdButton.Tag = "Help text for the command button."
End Sub
Sub txtDescription_GotFocus()
' Tag property setting as caption.
Me!lblMessage.Caption = Me!txtDescription.Tag
End Sub
Sub txtDescription_LostFocus()
Me!lblMessage.Caption = ""
End Sub
Sub cmdButton_GotFocus()
' Tag property setting as caption.
Me!lblMessage.Caption = Me!cmdButton.Tag
End Sub
Sub cmdButton_LostFocus()
Me.lblMessage.Caption = " "
End Sub
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.