导航:首页 > 版本升级 > vb获取操作系统版本

vb获取操作系统版本

发布时间:2023-12-10 12:48:36

『壹』 VBA获得软件版本

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

PublicSubGet_Environ()
Debug.PrintEnviron("Windir")'c:windowsWindows目录
Debug.PrintEnviron("ProgramFiles")'c:ProgramFiles应用程序文件
Debug.PrintEnviron("UserProfile")'C:用户配置文件目录
Debug.PrintEnviron("ALLUSERSPROFILE")'局部返回所有“用户配置文件”的位置。
Debug.PrintEnviron("APPDATA")'局部返回默认情况下应用程序存储数据的位置。
Debug.PrintEnviron("COMPUTERNAME")'系统返回计算机的名称。
Debug.PrintEnviron("COMSPEC")'系统返回命令行解释器可执行程序的准确路径。
Debug.PrintEnviron("HOMEDRIVE")'系统返回连接到用户主目录的本地工作站驱动器号。基于主目录值的设置。用户主目录是在“本地用户和组”中指定的。
Debug.PrintEnviron("HOMEPATH")'系统返回用户主目录的完整路径。基于主目录值的设置。用户主目录是在“本地用户和组”中指定的。
Debug.PrintEnviron("NUMBER_OF_PROCESSORS")'系统指定安装在计算机上的处理器的数目。
Debug.PrintEnviron("OS")'系统返回操作系统的名称。Windows2000将操作系统显示为Windows_NT。
Debug.PrintEnviron("PATH")'系统指定可执行文件的搜索路径。
Debug.PrintEnviron("PATHEXT")'系统返回操作系统认为可执行的文件扩展名的列表。
Debug.PrintEnviron("PROCESSOR_ARCHITECTURE")'系统返回处理器的芯片体系结构。值:x86,IA64。
Debug.PrintEnviron("PROCESSOR_LEVEL")'系统返回计算机上安装的处理器的型号。
Debug.PrintEnviron("PROCESSOR_LEVEL")'系统返回处理器的版本号。
Debug.PrintEnviron("SYSTEMDRIVE")'系统返回包含WindowsXP根目录(即系统根目录)的驱动器。
Debug.PrintEnviron("SYSTEMROOT")'系统返回WindowsXP根目录的位置。
Debug.PrintEnviron("TEMP")'and%TMP")'系统和用户返回对当前登录用户可用的应用程序所使用的默认临时目录。有些应用程序需要TEMP,而其它应用程序则需要TMP。
Debug.PrintEnviron("USERDOMAIN")'局部返回包含用户帐户的域的名称。
Debug.PrintEnviron("USERNAME")'局部返回当前登录的用户的名称。
EndSub

『贰』 VB获取操作系统版本信息问题

Private Declare Function GetVersionEx Lib "kernel32" Alias "GetVersionExA" (lpVersionInformation As OSVERSIONINFO) As Long

Private Type OSVERSIONINFO
dwOSVersionInfoSize As Long
dwMajorVersion As Long
dwMinorVersion As Long
dwBuildNumber As Long
dwPlatformId As Long
szCSDVersion As String * 128 ' Maintenance string for PSS usage
End Type

Private Sub Command1_Click()
Dim xx As OSVERSIONINFO
'在正式调用函数之前,必须先将这个结构的dwOSVersionInfoSize字段设为结构的大小(148)
xx.dwOSVersionInfoSize = 148
GetVersionEx xx
Print xx.dwBuildNumber
Print xx.dwMajorVersion
Print xx.dwMinorVersion
Print xx.dwOSVersionInfoSize
Print xx.dwPlatformId
Print xx.szCSDVersion
End Sub

阅读全文

与vb获取操作系统版本相关的资料

热点内容
三星note3微信版本最好 浏览:846
魅族3怎么让网络变好 浏览:469
苹果七猫下载的小说文件夹找不到 浏览:451
extjsgrid多行 浏览:823
广州南vip候车有哪些app 浏览:265
linux包组安装位置 浏览:903
pfile文件在哪里 浏览:286
编程中如何提取得到十位数 浏览:392
app账户未验证怎么办啊 浏览:40
黑莓bbb文件 浏览:97
swf视频文件手机播放 浏览:732
智能电表显示错误代码err32 浏览:813
苹果6没开iCloud能找回吗 浏览:469
java正则4位数字 浏览:836
计算机考试保存到考生文件夹视频 浏览:477
千本笔记app怎么下载 浏览:769
淘宝店铺装修无缝代码 浏览:862
js如何生成唯一的数据 浏览:755
win10查看激活 浏览:737
iphone屏蔽垃圾短信 浏览:297

友情链接