FileVersion

如果文件分配有必要的属性,FileVersion 将返回文件的版本。

语法

FileVersion (String)

返回结果

如果文件版本信息存在,则为文件的版本(返回字符串)。

示例

显示 calc.exe 的文件版本:

函数 Main

Dim textfile As Object

Dim ver As String

Set textfile = File.Connect("127.0.0.1")

If textfile.Open("c:\windows\system32\calc.exe", GENERIC_READ, Open_Existing) Then

ver = Textfile.FileVersion

echo("您的 Calc.exe 文件版本为: " & ver)

textfile.Close

End If

End 函数