Propriedade ApplicationSettings.DrawingBackgroundColor (Visio)

Determina a cor do plano de fundo da janela de desenho do Microsoft Visio. Leitura/gravação.

Sintaxe

expressão. DrawingBackgroundColor

Expressão Uma variável que representa um objeto ApplicationSettings .

Valor de retorno

OLE_COLOR

Comentários

Os valores válidos para uma propriedade OLE_COLOR do Visio pode ser um dos valores a seguir:

• &H00 bbggrr, onde bb é o valor azul entre 0 e 0xFF (255), gg o valor verde e rr o valor vermelho.

• &H800000 xx , em que xx é um índice GetSysColor válido.

Para obter detalhes sobre a função GetSysColor , pesquise por " GetSysColor " no SDK da Plataforma Microsoft no MSDN.

O tipo de dados OLE_COLOR é usado para propriedades que retornam cores. Quando uma propriedade é declarada como OLE_COLOR, o janela Propriedades exibe uma caixa de diálogo seletor de cores que permite que o usuário selecione a cor da propriedade visualmente, em vez de ter que lembrar o equivalente numérico.

Além disso, você pode usar as seguintes constantes de cores do Microsoft Visual Basic for Applications (VBA) para OLE_COLOR.

Constant	Valor	Descrição
vbBlack	0x0	Preto
vbRed	0xff	Vermelho
vbGreen	0xFF00	Verde
vbYellow	0xffff	Amarelo
vbBlue	0xFF0000	Azul
vbMagenta	0xFF00FF	Magenta
vbCyan	0xFFFF00	Ciano
vbWhite	0xFFFFFF	Branco

Definir a propriedade BackgroundColor da janela ativa como um valor diferente do padrão (-1) substitui a configuração DrawingBackgroundColor para essa janela. Para poder redefinir a cor do plano de fundo da mesma janela ativa definindo a propriedade DrawingBackgroundColor, você terá que redefinir BackgroundColor para o seu valor padrão, -1. Se houver várias janelas abertas, a definição de BackgroundColor para uma janela não terá qualquer efeito sobre as outras janelas abertas.

Observação

A capacidade de definir programaticamente a cor do plano de fundo do desenho é restrita quando o usuário está operando em modo de alto contraste.

Exemplo

A macro VBA a seguir mostra como usar a propriedade DrawingBackgroundColor para obter e definir a cor do plano de fundo do aplicativo. Ele também mostra como obter um objeto ApplicationSettings do objeto Aplicativo Visio e demonstra a relação entre a propriedade DrawingBackgroundColor e a propriedade Window.BackgroundColor . Este exemplo pressupõe que há uma janela de desenho aberta no Visio e que, inicialmente, todas as propriedades de cor em segundo plano estão definidas como seus valores padrão.

Public Sub DrawingBackgroundColor_Example() 
 
 Dim vsoApplicationSettings As Visio.ApplicationSettings 
 Set vsoApplicationSettings = Visio.Application.Settings 
 
 'Get the current application background color. 
 Debug.Print vsoApplicationSettings.DrawingBackgroundColor 
 
 'Get the active window background color. 
 Debug.Print ActiveWindow.BackgroundColor 
 
 'Change the application background color. 
 'This will also change the active window color as 
 'well as the setting in the Color Settings dialog box 
 vsoApplicationSettings.DrawingBackgroundColor = vbRed 
 
 'Change the active window background color. 
 ActiveWindow.BackgroundColor = vbMagenta 
 
 'Change the application background color again. 
 'This time, there is no change in the current 
 'window color, but the dialog box setting changes. 
 vsoApplicationSettings.DrawingBackgroundColor = vbYellow 
 
 'Reset Window.BackgroundColor to its default value. 
 ActiveWindow.BackgroundColor = -1 
 
 'Change the application background color again. 
 'Now both the active window color 
 'and the dialog box setting change. 
 vsoApplicationSettings.DrawingBackgroundColor = vbBlue 
 
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.