Свойство Application.Version (Visio)

Возвращает версию запущенного экземпляра Microsoft Visio. Только для чтения.

Синтаксис

выражение. Версия

выражение: переменная, представляющая объект Application.

Возвращаемое значение

String

Примечания

Используйте свойство Version объекта Application , чтобы проверить версию конкретного экземпляра Visio. Эти сведения будут полезны, если для вашей программы требуется определенная версия. Возвращаются как основные, так и дополнительные номера версий. Строка, возвращаемая приложением Visio, имеет значение 15,0.

Пример

В этом приложении Microsoft Visual Basic для приложений (VBA) показано, как распечатать версию экземпляра Visio в окне интерпретации.

 
Public Sub Version_Example() 
 
 Dim vsoApplication As Visio.Application 
 Dim strVersion As String 
 Dim intDotPosition As Integer 
 Set vsoApplication = CreateObject("Visio.Application") 
 
 strVersion = vsoApplication.Version 
 intDotPosition = InStr(strVersion, ".") 
 
 Debug.Print " Major Version : "; Left(strVersion, intDotPosition - 1) 
 Debug.Print " Minor Version : "; Right(strVersion, Len(strVersion) - intDotPosition) 
 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.