Tag (propiedad)

Se aplica a

Objeto BoundObjectFrame	Objeto Image	Objeto OptionGroup	Objeto SubForm
Objeto CheckBox	Objeto Label	Objeto Page	Colección TabControl
Objeto ComboBox	Objeto Line	Objeto PageBreak	Objeto TextBox
Objeto CommandButton	Objeto ListBox	Objeto Rectangle	Objeto ToggleButton
Objeto CustomControl	Objeto ObjectFrame	Objeto Report
Objeto Form	Objeto OptionButton	Objeto Section

Almacena información adicional sobre un formulario, informe, página de acceso a datos, sección o control necesario para una aplicación de Access. Valor String de lectura y escritura.

expresión.Tag

expresión Obligatorio. Una expresión que devuelve uno de los objetos de la lista Se aplica a.

Comentarios

Puede escribir una expresión de cadena de hasta 2048 caracteres. La configuración predeterminada es una cadena de longitud cero (" ").

Puede establecer esta propiedad mediante la hoja de propiedades del objeto, una macro o código de Visual Basic para Aplicaciones (VBA).

A diferencia de otras propiedades, el valor de la propiedad Tag no afecta a ninguno de los atributos del objeto.

Puede usar esta propiedad para asignar una cadena de identificación a un objeto sin afectar a ninguno de los valores de otras propiedades ni causar efectos secundarios. La propiedad Tag es útil cuando necesita comprobar la identidad de un formulario, informe, página de acceso a datos, sección o control que se pasa como una variable a un procedimiento.

Ejemplo

En el siguiente ejemplo se usa la propiedad Tag para mostrar mensajes personalizados sobre los controles de un formulario. Cuando un control tiene el foco, se muestra texto descriptivo en un control de etiqueta denominado lblMessage. Para especificar el texto del mensaje se establece la propiedad Tag de cada control en una cadena de texto corto. Cuando un control recibe el foco, su propiedad Tag se asigna a la propiedad Caption del control de etiqueta. En este ejemplo se muestra el texto descriptivo de un cuadro de texto con nombre 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