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 函数