Compartilhar via


Propriedade Shape.Characters (Visio)

Retorna um objeto Characters que representa o texto de uma forma. Somente leitura.

Sintaxe

expression. Characters

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

Valor de retorno

Caracteres

Comentários

Se sua solução do Visual Studio incluir a referência Microsoft.Office.Interop.Visio , essa propriedade será mapeada para os seguintes tipos:

  • Caracteres Microsoft.Office.Interop.Visio.IVShape.Characters

Exemplo

Esta macro VBA (Microsoft Visual Basic for Applications) mostra como usar a propriedade Characters de uma forma para obter um objeto Characters. Depois de recuperar um objeto Characters, o exemplo utiliza a propriedade Shape do objeto Characters para obter a forma que contém os caracteres e para demonstrar que a forma recipiente foi recuperada, imprimindo o texto na janela Immediate.

 
Public Sub Characters_Example() 
  
    Dim vsoOval As Visio.Shape  
    Dim vsoShapeFromCharacters As Visio.Shape  
    Dim vsoCharacters As Visio.Characters  
 
    'Create a shape and add text to it. 
    Set vsoOval = ActivePage.DrawOval(2, 5, 5, 7)  
    vsoOval.Text = "Rectangular Shape"  
 
    'Get a Characters object from the oval shape. 
    Set vsoCharacters = vsoOval.Characters  
 
    'Set the Begin and End properties so that we can 
    'replace the word "Rectangular" with "Oval" 
    vsoCharacters.Begin = 0 
    vsoCharacters.End = 11 
    vsoCharacters.Text = "Oval" 
 
    'Use the Shape property of the Characters object 
    'to get the Shape object. 
    Set vsoShapeFromCharacters = vsoCharacters.Shape  
 
    'Print the shape's text to verify that the proper Shape 
    'object was returned.  
    Debug.Print vsoShapeFromCharacters.Text 
  
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.