ProductVersion
ProductVersion 傳回檔案的產品版本屬性（如果此類資訊存在）。
語法
ProductVersion
結果
字串
範例
顯示 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.ProductVersion
echo("您的 Calc.exe 產品版本是: " & ver)
textfile.Close
End If
End Function