Propiedad SubForm.Properties (Access)

Devuelve una referencia al objeto de colección de Propiedades de un control. Solo lectura.

Sintaxis

expresión. Propiedades

Expresión Variable que representa un objeto SubForm .

Comentarios

El objeto de la colección Properties es la colección de todas las propiedades relacionadas con un control. Haga referencia a miembros individuales de la colección mediante el índice del objeto miembro o una expresión de cadena que sea el nombre del objeto miembro.

El primer objeto miembro de la colección tiene un valor de índice de 0 y el número total de objetos miembro de la colección es el valor de la propiedad Count de la colección Properties menos 1.

Ejemplo:

El siguiente procedimiento utiliza la propiedad Properties para imprimir todas las propiedades asociadas con los controles de un formulario en la ventana de depuración. Para ejecutar este código, coloque un botón de comando denominado cmdListProperties en un formulario y pegue el código siguiente en la sección Declaraciones del formulario. Haga clic en el botón de comando para imprimir la lista de propiedades en la ventana Depuración.

Private Sub cmdListProperties_Click() 
 ListControlProps Me 
End Sub 
 
Public Sub ListControlProps(ByRef frm As Form) 
 Dim ctl As Control 
 Dim prp As Property 
 
 On Error GoTo props_err 
 
 For Each ctl In frm.Controls 
 Debug.Print ctl.Properties("Name") 
 For Each prp In ctl.Properties 
 Debug.Print vbTab & prp.Name & " = " & prp.Value 
 Next prp 
 Next ctl 
 
props_exit: 
 Set ctl = Nothing 
 Set prp = Nothing 
Exit Sub 
 
props_err: 
 If Err = 2187 Then 
 Debug.Print vbTab & prp.Name & " = Only available at design time." 
 Resume Next 
 Else 
 Debug.Print vbTab & prp.Name & " = Error Occurred: " & Err.Description 
 Resume Next 
 End If 
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.