Shape.Data1-Eigenschaft (Visio)
Dient zum Abrufen oder Festlegen des Werts für das Data1-Feld eines Shape-Objekts. Lese-/Schreibzugriff.
Syntax
Ausdruck. Data1
expression Eine Variable, die ein Shape-Objekt darstellt.
Rückgabewert
String
Hinweise
Verwenden Sie die Data1-Eigenschaft , um zusätzliche Informationen zu einem Shape anzugeben. Die -Eigenschaft kann bis zu 64 KB Zeichen enthalten. Textsteuerelemente sollten mit Bedacht mit einer Zeichenfolge verwendet werden, die größer als 3.000 Zeichen ist. Das Festlegen der Data1-Eigenschaft entspricht der Eingabe von Informationen in das Feld Daten1 im Dialogfeld Spezial (klicken Sie auf der Registerkarte Entwicklertools in der Gruppe Shape-Entwurf auf Shape-Name).
Beispiel
Dieses VBA-Makro (Microsoft Visual Basic for Applications) zeigt, wie die Data1-, Data2- und Data3-Eigenschaften eines Shapes festgelegt werden. Die Werte dieser Eigenschaften werden im Direktfenster ausgegeben. Sie können auch überprüfen, ob diese Werte festgelegt wurden, indem Sie das Dialogfeld Spezial öffnen.
Public Sub Data123_Example()
Dim vsoPage As Visio.Page
Dim vsoShape As Visio.Shape
Set vsoPage = Documents.Add("").Pages(1)
Set vsoShape = vsoPage.DrawRectangle(3, 3, 5, 5)
'Use the Data1, Data2, and Data3 properties to set
'the shape's Data fields.
vsoShape.Data1 = "Data1_String"
vsoShape.Data2 = "Data2_String"
vsoShape.Data3 = "Data3_String"
'Use the Data1, Data2, and Data3 properties to verify
'the shape's Data field values.
Debug.Print vsoShape.Data1
Debug.Print vsoShape.Data2
Debug.Print vsoShape.Data3
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.