Document. FullBuildNumberCreated-Eigenschaft (Visio)Document.FullBuildNumberCreated property (Visio)

Gibt die komplette Buildnummer der Instanz zurück, mit der das Dokument erstellt wurde.Returns the full build number of the instance used to create the document. Schreibgeschützt.Read-only.

SyntaxSyntax

Ausdruck. FullBuildNumberCreatedexpression.FullBuildNumberCreated

Ausdruck Eine Variable, die ein Document -Objekt darstellt.expression A variable that represents a Document object.

RückgabewertReturn value

LongLong

HinweiseRemarks

Das Format der kompletten Buildnummer wird in der folgenden Tabelle beschrieben.The format of the full build number is described in the following table.

BitBits BeschreibungDescription
0 -150 - 15 Interne BuildnummerInternal build number
16 -2016 - 20 Interne ÜberarbeitungsnummerInternal revision number
21 -2521 - 25 Nummer der NebenversionMinor version number
26 -3026 - 30 Hauptversionsnummer (Visio = 15)Major version number (Visio = 15)
3131 ReservedReserved

Darüber hinaus ist es für Visio erforderlich, die korrekte vollständige Buildnummer zu erhalten, die dem internen Versionsnummern Teil der vollständigen Buildnummer, die von der FullBuildNumberCreated -Eigenschaft zurückgegeben wird, wie im folgenden Makro gezeigt, 1000 hinzugefügt wird.In addition, for Visio, to obtain the correct full build number, it is necessary to add 1000 to the internal revision number part of the full build number returned by the FullBuildNumberCreated property, as shown in the following macro.

BeispielExample

Die folgenden VBA-Prozeduren (Microsoft Visual Basic für Applikationen) veranschaulichen, wie Sie mit der FullBuildNumberCreated-Eigenschaft die komplette Buildnummer der Visio-Instanz abrufen, mit der das Dokument erstellt wurde.The following Microsoft Visual Basic for Applications (VBA) procedures show how to use the FullBuildNumberCreated property to get the full build number of the instance of Visio used to create the document. Nachdem die vollständige Buildnummer abgerufen wurde, analysiert die ParseFullBuildNumberCreatedProperty -Prozedur die Zahl und druckt die Ergebnisse im Direktfenster.After the full build number has been obtained, the ParseFullBuildNumberCreatedProperty procedure parses the number and prints the results in the Immediate window.

Public Sub FullBuildNumberCreated_Example() 
 
 Dim lngFullBuild As Long 
 lngFullBuild = ActiveDocument.FullBuildNumberCreated 
 ParseFullBuildNumberCreatedProperty (lngFullBuild) 
 
End Sub 
 
Public Sub ParseFullBuildNumberCreatedProperty(ByRef lngFullBuild As Long) 
 
 Dim lngMajor As Long 
 Dim lngMinor As Long 
 Dim lngRevision As Long 
 Dim lngBuild As Long 
 Dim lngNumber As Long 
 
 lngNumber = lngFullBuild 
 
 ' Low 16 bits: 
 lngBuild = lngNumber Mod 65536 
 lngNumber = lngNumber / 65536 
 
 'Next 5 bits: 
 lngRevision = lngNumber Mod 32 
 lngNumber = lngNumber / 32 
 
 'Next 5 bits: 
 lngMinor = lngNumber Mod 32 
 lngNumber = lngNumber / 32 
 
 'Next 5 bits: 
 lngMajor = lngNumber Mod 32 
 lngNumber = lngNumber / 32 
 
 'Remaining 1 bit unused and 0 as of Visio 2010 
 Debug.Print "lngFullBuild (full version specification): " & lngMajor & "." _ 
 & lngMinor & "." & lngBuild & "." & lngRevision + 1000 
 Debug.Assert(0 = lngNumber) 
 
End Sub

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.