VBA获得软件版本号

Win7环境下,Access2010中,使用VBA编程,如何获得机器安装的各个软件以及版本号?... Win7环境下,Access2010中,使用VBA编程,如何获得机器安装的各个软件以及版本号? 展开
 我来答
世界喜欢不一样
推荐于2016-05-07 · TA获得超过2375个赞
知道大有可为答主
回答量:1546
采纳率:50%
帮助的人:670万
展开全部

'VB Environ系统环境变量函数大全:

Public Sub Get_Environ()
Debug.Print Environ("Windir")  'c:\windows Windows 目录
Debug.Print Environ("ProgramFiles")  'c:\ProgramFiles 应用程序文件夹
Debug.Print Environ("UserProfile")  'C:\Documents and Settings\Administrator 用户配置文件目录
Debug.Print Environ("ALLUSERSPROFILE")  '局部 返回所有“用户配置文件”的位置。
Debug.Print Environ("APPDATA")  '局部 返回默认情况下应用程序存储数据的位置。
Debug.Print Environ("COMPUTERNAME")  '系统 返回计算机的名称。
Debug.Print Environ("COMSPEC")  '系统 返回命令行解释器可执行程序的准确路径。
Debug.Print Environ("HOMEDRIVE")  '系统 返回连接到用户主目录的本地工作站驱动器号。基于主目录值的设置。用户主目录是在“本地用户和组”中指定的。
Debug.Print Environ("HOMEPATH")  '系统 返回用户主目录的完整路径。基于主目录值的设置。用户主目录是在“本地用户和组”中指定的。
Debug.Print Environ("NUMBER_OF_PROCESSORS")  '系统 指定安装在计算机上的处理器的数目。
Debug.Print Environ("OS")  '系统 返回操作系统的名称。Windows 2000 将操作系统显示为 Windows_NT。
Debug.Print Environ("PATH")  '系统 指定可执行文件的搜索路径。
Debug.Print Environ("PATHEXT")  '系统 返回操作系统认为可执行的文件扩展名的列表。
Debug.Print Environ("PROCESSOR_ARCHITECTURE")  '系统 返回处理器的芯片体系结构。值: x86,IA64。
Debug.Print Environ("PROCESSOR_LEVEL")  '系统 返回计算机上安装的处理器的型号。
Debug.Print Environ("PROCESSOR_LEVEL")  '系统 返回处理器的版本号。
Debug.Print Environ("SYSTEMDRIVE")  '系统 返回包含 Windows XP 根目录(即系统根目录)的驱动器。
Debug.Print Environ("SYSTEMROOT")  '系统 返回 Windows XP 根目录的位置。
Debug.Print Environ("TEMP")  'and %TMP") '系统和用户 返回对当前登录用户可用的应用程序所使用的默认临时目录。有些应用程序需要 TEMP,而其它应用程序则需要 TMP。
Debug.Print Environ("USERDOMAIN")  '局部 返回包含用户帐户的域的名称。
Debug.Print Environ("USERNAME")  '局部 返回当前登录的用户的名称。
End Sub
更多追问追答
追问
牛头不对马嘴,我需要获得的是系统中安装的软件及其版本号!
追答
各个软件?有指定的范围吗?
获取版本号:Application.Version
请问,您是驴唇马嘴其中的哪一个呢?
AiPPT
2024-09-19 广告
随着AI技术的飞速发展,如今市面上涌现了许多实用易操作的AI生成工具1、简介:AiPPT: 这款AI工具智能理解用户输入的主题,提供“AI智能生成”和“导入本地大纲”的选项,生成的PPT内容丰富多样,可自由编辑和添加元素,图表类型包括柱状图... 点击进入详情页
本回答由AiPPT提供
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式