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

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

Синтаксис

expression. Версия

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

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

Строка

Замечания

Используйте свойство 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 и обратная связь.