Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Retorna uma referência ao objeto de coleção de Propriedades de um controle. Somente leitura.
Sintaxe
expressão. Propriedades
expressão Uma variável que representa um objeto TextBox .
Comentários
Objeto da coleção de Propriedades é a coleção de todas as propriedades relacionadas a um controle. Veja os membros individuais da coleção com o índice do objeto membro ou uma expressão de cadeia que seja o nome do objeto membro.
O primeiro objeto membro na coleção tem um valor de índice de 0 e o número total de objetos membros na coleção é o valor da propriedade Contagem da coleção Propriedades menos 1.
Exemplo
O procedimento a seguir usa a propriedade Properties para imprimir todas as propriedades associadas aos controles em um formulário para a janela de depuração. Para executar este código, coloque um botão de comando com o nome cmdListProperties num formulário e cole o seguinte código na secção Declarações do formulário. Clique no botão de comando para imprimir a lista de propriedades na janela de depuração.
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
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.