Propriedade CommandButton.Bevel (Access)
Obtém ou define o efeito de bisel aplicado ao objeto especificado. Long de leitura/gravação.
Sintaxe
expressão. Bisel
Expressão Uma variável que representa um objeto CommandButton .
Comentários
A propriedade bisel contém uma expressão numérica que representa o efeito de bisel aplicado ao objeto especificado. O valor padrão da propriedade bisel é 0, o que não se aplica um efeito de bisel.
Os efeitos de bevel incluem valores listados na tabela a seguir.
Valor | Efeito |
---|---|
0 | Nenhuma |
1 | Circle |
2 | Baixo-relevo Relaxado |
3 | Quadriculado |
4 | Inclinação Moderada |
5 | Ângulo |
6 | Arredondamento Leve |
7 | Convexo |
8 | Slope |
9 | Malha |
10 | Talho |
11 | Borda Nítida |
12 | Art Decô |
Para ver os efeitos de bevel disponíveis e aplicar um bevel por meio da interface do usuário, primeiro abra o formulário ou o relatório na exibição Layout ou Design clicando com o botão direito do mouse no formulário ou relatório no painel de navegação e, em seguida, escolhendo a exibição desejada.
Em seguida, escolha o objeto ao qual você deseja aplicar um efeito bevel. Na guia Formatar, no grupo Formatação de Controle, escolha Efeitos> deFormaÇão Bevel e escolha um efeito bevel.
Observe que os efeitos de bevel são indexados da esquerda para a direita e, em seguida, de cima para baixo. O primeiro item, em No Bevel, tem o valor 0. Em Bevel, a primeira linha contém efeitos de bevel com valores de 1 a 4, a segunda linha de 5 a 8 e a terceira linha de 9 a 12.
Esta propriedade não é exibida na folha de propriedades.
Exemplo
O exemplo de código a seguir define o efeito de bisel como Cruz.
Public Const BevelEffectNone = 0
Public Const BevelEffectCircle = 1
Public Const BevelEffectRelaxedInset = 2
Public Const BevelEffectCross = 3
Public Const BevelEffectCoolSlant = 4
Public Const BevelEffectAngle = 5
Public Const BevelEffectSoftRound = 6
Public Const BevelEffectConvex = 7
Public Const BevelEffectSlope = 8
Public Const BevelEffectDivot = 9
Public Const BevelEffectRiblet = 10
Public Const BevelEffectHardEdge = 11
Public Const BevelEffectArtDeco = 12
Me.ctl.Bevel = BevelEffectCross
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.