用GetVersion可以获得当前操作系统的版本:函数声明
Declare Function GetVersion Lib "kernel32" () As Long 该函数返回当前Windows版本号和DOS版本号。返回值的低位字节说明Windows主版本号,返回值的低位字的高位字节说明Windows副版本号,高位字的低位字节说明DOS副版本号,高位字的高位字节说明DOS主版本号。根据相应的返回值进行判断就可以了。