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("Your Calc.exe Product version is : " & ver)

textfile.Close

End If

End Function