FullBuild Property [Visio 2003 SDK Documentation]
Returns the full build number of the running instance.
retVal = object**.FullBuild**
retVal Long. The build number.
object Required. An expression that returns an Application object.
Version added
2002
Remarks
The format of the build number is described in the following table.
Bits | Description |
---|---|
0 - 15 |
Internal build number |
16 - 20 |
Internal revision number |
21 - 25 |
Minor version number |
26 - 30 |
Major version number (Microsoft Office Visio 2003 = 11) |
31 |
Reserved |
The build number of the running instance is written to the FullBuildNumberCreated property when a new document is created, and to the FullBuildNumberEdited property when a document is edited.
Example
The following Microsoft Visual Basic procedures show how to use the FullBuild property to get the full build number of the current instance of Microsoft Office Visio. Once the full build number has been obtained, the ParseFullBuildProperty procedure parses the number and prints it in the Immediate window.
Public Sub FullBuild_Example()
Dim lngFullBuild as Long
lngFullBuild = Application.FullBuild
ParseFullBuildProperty (lngFullBuild)
End Sub
Public Sub ParseFullBuildProperty(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 2002
Debug.Print "lngFullBuild (full version specification): " & lngMajor & "." _
& lngMinor & "." & lngRevision & "." & lngBuild
Debug.Assert(0 = lngNumber)
End Sub
Applies to | Application object | InvisibleApp object
See Also | Build property | BuildNumberCreated property | BuildNumberEdited property | FullBuildNumberCreated property | FullBuildNumberEdited property