Método Page.DrawLine (Visio)

Adiciona uma linha à coleção Shapes de uma página.

Sintaxe

expression. DrawLine( _xBegin_ , _yBegin_ , _xEnd_ , _yEnd_ )

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

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
xBegin Obrigatório Double A coordenada x do ponto inicial da linha.
yBegin Obrigatório Double A coordenada y do ponto inicial da linha.
xEnd Obrigatório Double A coordenada x do ponto de extremidade da linha.
yEnd Obrigatório Double A coordenada y do ponto de extremidade da linha.

Valor de retorno

Forma

Comentários

Usar o método DrawLine equivale a usar a ferramenta Linha no Microsoft Visio. Os argumentos estão em unidades de desenho internas com relação ao espaço de coordenadas da página, mestre ou grupo no qual a linha é colocada.

Exemplo

O exemplo a seguir mostra como desenhar uma forma de linha na página ativa.

 
Public Sub DrawLine_Example() 
 
 Dim vsoShape As Visio.Shape 
 
 Set vsoShape = ActivePage.DrawLine(5, 4, 7.5, 1) 
 
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.