Characters.Text-Eigenschaft (Visio)

Artikel
04/07/2023

Gibt den Textbereich zurück, der durch ein Characters-Objekt dargestellt wird. Dabei kann es sich abhängig von den Werten der Eigenschaften End und Begin des Characters-Objekts um eine Teilmenge des Shapetexts handeln. Lese-/Schreibzugriff.

Syntax

Ausdruck. Text

Ausdruck Eine Variable, die ein Characters-Objekt darstellt.

Rückgabewert

Variant

Bemerkungen

Der Text für ein Characters-Objekt wird in einem Variant-Wert vom Typ String statt in einem String-Wert zurückgegeben. Wenn sie Microsoft Visual Basic verwenden, ist das in der Regel transparent.

Im Text, der von einem Characters-Objekt zurückgegeben wird, werden Felder auf die Anzahl der im Zeichnungsfenster sichtbaren Zeichen erweitert. Wenn z. B. der Text eines Shapes ein Feld enthält, in dem der Dateiname einer Zeichnung angezeigt wird, gibt die Text-Eigenschaft eines Characters-Objekts den erweiterten Dateinamen zurück (vorausgesetzt die Eigenschaften Begin und End wurden nicht geändert).

Wenn ein Characters-Objekt den Text eines Shapes darstellt, bei dem es sich um eine Gruppe handelt, wird stets der Text der Gruppe zurückgegeben.

Objekte aus anderen Anwendungen und Führungslinien besitzen keine Text-Eigenschaft.

Wenn Ihre Visual Studio-Projektmappe den Verweis Microsoft.Office.Interop.Visio enthält, wird diese Eigenschaft den folgenden Typen zugeordnet:

Microsoft.Office.Interop.Visio.IVCharacters.Text

Beispiel

Dieses VBA-Makro (Microsoft Visual Basic für Applikationen) veranschaulicht, wie Sie die Text-Eigenschaft des Characters-Objekts abrufen.

 
Public Sub CharactersText_Example()  
 
    Dim vsoOval As Visio.Shape  
    Dim vsoCharacters As Visio.Characters  
 
    'Create a shape and add text. 
    Set vsoOval = ActivePage.DrawOval(2, 5, 5, 7)  
    vsoOval.Text = "Oval Shape"  
 
    'Get a Characters object from the shape. 
    Set vsoCharacters = vsoOval.Characters  
 
    'Get the text from the Characters object. 
    Debug.Print vsoCharacters.Text  
 
End Sub

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.

Freigeben über