如何取得.exe文件“属性-版本”中的“产品名称”？

[green_hong]

用哪个API函数？或者别的方法？

[griefforyou]

看看 VB中菜单 工程->属性->生成选项卡

[uguess]

Private Declare Function GetFileVersionInfo Lib "version.dll" Alias "GetFileVersionInfoA" (ByVal lptstrFilename As String, ByVal dwHandle As Long, ByVal dwLen As Long, lpData As Any) As Long
Private Declare Function GetFileVersionInfoSize Lib "version.dll" Alias "GetFileVersionInfoSizeA" (ByVal lptstrFilename As String, lpdwHandle As Long) As Long
Private Declare Function VerQueryValue Lib "version.dll" Alias "VerQueryValueA" (pBlock As Any, ByVal lpSubBlock As String, lplpBuffer As Any, puLen As Long) As Long
Private Declare Sub MoveMemory Lib "Kernel32" Alias "RtlMoveMemory" (dest As Any, ByVal Source As Long, ByVal Length As Long)
Private Declare Function lstrcpy Lib "Kernel32" Alias "lstrcpyA" (ByVal lpString1 As String, ByVal lpString2 As Long) As Long
Public Declare Function VerLanguageName Lib "Kernel32" Alias "VerLanguageNameA" (ByVal wLang As Long, ByVal szLang As String, ByVal nSize As Long) As Long

就用这些函数。

[green_hong]

这里确实不如“VB爱好者乐园”，象这样的问题，5分钟内就有人响应。

[enmity]

楼上，VB爱好者乐园的网址是什么？

到：

http://caotang.myetang.com/temp/appinfo.zip

下载一个给你满意的例子

顺便提一下：现在是吃饭时候，大部分网友都吃饭去啦，人当然少了！

[DeityFox]

TO：　enmity(灵感之源)　

VB爱好者乐园的网址

http://www.d1vb.com/

[enmity]

谢谢楼上，我去看看