Propriedade Application.Version (Visio)
Retorna a versão de uma instância do Microsoft Visio em execução. Somente leitura.
Sintaxe
expressão. Versão
expressão Uma variável que representa um Aplicativo objeto.
Valor de retorno
Cadeia de caracteres
Comentários
Use a propriedade Version do objeto Application para verificar a versão de uma determinada instância do Visio. Essa informação será útil se o programa exigir uma versão em particular. Os números de versão principal e secundária são retornados. A cadeia de caracteres retornada pelo Visio é 15.0.
Exemplo
Este programa do Microsoft Visual Basic for Applications (VBA) mostra como imprimir a versão de uma instância do Visio na janela Immediate.
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
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.