请教如何用VB写程序来知道系统信息

请问如果用VB写程序来知道操作系统的版本，然后CPU是多少的，内存多大，硬盘信息等等，谢谢！

解决方案 »

  1.   

    在VB中有这方面的模块，打开VB工程，然后添加窗体，在新建标签中选择“关于对话框”，查看里面的代码应该由你要的信息
      

  2.   

    GetVersionEx
    GetSystemInfo
    GetDiskFreeSpaceEx
      

  3.   

    请问你说的这几个是API吗？该怎么用呢？能不能写个简单的代码给我示例一下，谢了。
      

  4.   

    晕了哦，我找到了怎么用这三个API了，不过好过时啊，GetVersionEx只能判断是不是win32,win98,winnt,win2000和winXP还有2003就不行了，GetSystemInfo判断我的电脑是586，但我是p4，估计p3也不能判断出来。
      

  5.   

    用api函数GetSystemMetrics：
    【VB声明】
      Private Declare Function GetSystemMetrics Lib "user32" Alias "GetSystemMetrics" (ByVal nIndex As Long) As Long【说明】
      返回与windows环境有关的信息 【返回值】
      Long，取决于具体的常数索引 【备注】
      常数 SM_ARRANGE, SM_CLEANBOOT, SM_CMETRICS, SM_C?MAXIMIZED,
      SM_C?MAXTRACK, SM_C?SIZEFRAME, SM_C?SMICON, SM_C?SMSIZE, SM_CYSMCAPTION, SM_SECURE,
      SM_SHOWSOUNDS, and SM_SLOWMACHINE 未获 NT 3.51 及更早版本的支持【参数表】
      nIndex ---------  Long，常数，指定欲获取的信息；如下表所示
      nIndex常数设置
      常数定义
      取得信息
      SM_ARRANGE
      设置windows如何排列最小化窗口的一个标志。参考api32.txt中的ARW常数
      SM_CLEANBOOT
      指定启动模式。0=普通模式；1=带网络支持的安全模式
      SM_CMETRICS
      可用系统环境的数量
      SM_CMOUSEBUTTON
      鼠标按钮（按键）的数量。如没有鼠标，就为零
      SM_CXBORDER, SM_CYBORDER
      尺寸不可变边框的大小
      SM_CXCURSOR, SM_CYCURSOR
      标准指针大小
      SM_CXDLGFRAME, SM_CYDLGFRAME
      对话框边框的大小
      SM_CXDOUBLECLK, SM_CYDOUBLECLK
      双击区域的大小（参考注解）
      SM_CXFRAME, SM_CYFRAME
      尺寸可变边框的大小（在win95和nt 4.0中使用SM_C?FIXEDFRAME）
      SM_CXFULLSCREEN, SM_CYFULLSCREEN
      最大化窗口客户区的大小
      SM_CXHSCROLL, SM_CYHSCROLL
      水平滚动条上的箭头大小
      SM_CXHTHUMB, SM_CYHTHUMB
      滚动块在水平滚动条上的大小
      SM_CXICON, SM_CYICON
      标准图标的大小
      SM_CXICONSPACING, SM_CYICONSPACING
      桌面图标之间的间隔距离。在win95和nt 4.0中是指大图标的间距
      SM_CXMAXIMIZED, SM_CYMAXIMIZED
      最大化窗口的默认尺寸
      SM_CXMAXTRACK, SM_CYMAXTRACK
      改变窗口大小时，最大的轨迹宽度
      SM_CXMENUCHECK, SM_CYMENUCHECK
      菜单复选号位图的大小
      SM_CXMENUSIZE, SM_CYMENUSIZE
      菜单栏上的按钮大小
      SM_CXMIN, SM_CYMIN
      窗口的最小尺寸
      SM_CXMINIMIZED, SM_CYMINIMIZED
      最小化的窗口必须填充进去的一个矩形小于或等于SM_C?ICONSPACING
      SM_CXMINTRACK, SM_CYMINTRACK
      窗口的最小轨迹宽度
      SM_CXSCREEN, SM_CYSCREEN
      屏幕大小
      SM_CXSIZE, SM_CYSIZE
      标题栏位图的大小
      SM_CXSIZEFRAME, SM_CYSIZEFRAME
      具有WS_THICKFRAME样式的窗口的大小
      SM_CXSMICON, SM_CYSMICON
      小图标的大小
      SM_CXSMSIZE, SM_CYSMSIZE
      小标题按钮的大小
      SM_CXVSCROLL, SM_CYVSCROLL
      垂直滚动条中的箭头按钮的大小
      SM_CYCAPTION
      窗口标题的高度
      SM_CYKANJIWINDOW
      Kanji窗口的大小（Height of Kanji window）
      SM_CYMENU
      菜单高度
      SM_CYSMCAPTION
      小标题的高度
      SM_CYVTHUMB
      垂直滚动条上滚动块的高度
      SM_DBCSENABLED
      如支持双字节则为TRUE
      SM_DEBUG
      如windows的调试版正在运行，则为TRUE
      SM_MENUDROPALIGNMENT
      如弹出式菜单对齐菜单栏项目的左侧，则为零
      SM_MIDEASTENABLED
      允许了希伯来和阿拉伯语
      SM_MOUSEPRESENT
      如安装了鼠标则为TRUE
      SM_MOUSEWHEELPRESENT
      如安装了带轮鼠标则为TRUE；只适用于nt 4.0
      SM_NETWORK
      如安装了网络，则设置位0。其他位保留未用
      SM_PENWINDOWS
      如装载了支持笔窗口的DLL，则表示笔窗口的句柄
      SM_SECURE
      如安装了安全（保密）机制，则为TRUE
      SM_SHOWSOUNDS
      强制视觉提示播放声音
      SM_SLOWMACHINE
      系统速度太慢，但仍在运行中（System is too slow for effective
      use but is being run anyway）
      SM_SWAPBUTTON
      如左右鼠标键已经交换，则为TRUE
      

  6.   

    利用微软提供的WMI实现获取系统信息的代码集合，包括获得系统信息、主板信息、BIOS信息等10个单独的源程序
    http://www.applevb.com/sourcecode/wmi.rar