FileVersion
如果檔案已指派必要的屬性,FileVersion 將傳回檔案的版本。
語法
FileVersion (字串)
結果
如果檔案版本資訊存在,則為檔案的版本(傳回字串)。
範例
顯示 calc.exe 的檔案版本:
Function 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 Function