共用方式為

(Visio) 的 Application.Version 屬性

  • 發行項

會傳回執行 Microsoft Visio 的版本。 唯讀。

語法

運算式。版本

expression 代表 Application 物件的變數。

傳回值

字串

註解

使用 Application 物件的 Version 屬性來確認特定 Visio 實例的版本。 如果您的程式需要特定版本，這項資訊會很有用。 會同時傳回主要和次要版本號碼。 Visio 傳回的字串為 15.0。

範例

下列 Microsoft Visual Basic for Applications (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 支援與意見反應。