摘 要: | 要用VB取得系统信息,可以通过VB的sysinfo控件和WINDOWS的API函数来实现。一、用sysinfo控件获得操作系统版本要用sysinfo控件,必需在部件引用中选择MICrosoftSysinfoControl复选框。程序代码如下:PrivateSubCommand1Click()DimMsgEndAsStringSelectCaseSyslnfol.OSPlatformCaseOMSgEfld=Uflidflfltififld”CaselMsgEnd=Windows95ver.”&CStr(Syslnfol.OSVerslon)Case2MSgEfld=Wifld0WSNTVVV.&CStY(Syslnfol.OSVerslon)EndSelectMsgBoxsystem:&MsgEndEndSelectMsgBoxsystem:&MsgEn…
|