- 注册时间
- 2011-8-8
- 最后登录
- 1970-1-1
该用户从未签到
|
取系统信息()
GetVersion
源码在这里
.版本 2
.程序集 窗口程序集1
.子程序 取系统版本, 整数型, 公开
置入代码 ({ 83, 51, 192, 100, 139, 29, 24, 0, 0, 0, 100, 139, 13, 48, 0, 0, 0, 133, 201, 121, 32, 185, 0, 0, 83, 0, 57, 75, 88, 117, 4, 176, 1, 235, 92, 57, 75, 84, 117, 4, 176, 2, 235, 83, 57, 75, 124, 117, 78, 176, 3, 235, 74, 139, 153, 168, 0, 0, 0, 139, 137, 164, 0, 0, 0, 131, 249, 4, 119, 4, 176, 4, 235, 53, 131, 249, 5, 117, 27, 131, 251, 0, 117, 4, 176, 5, 235, 39, 131, 251, 1, 117, 4, 176, 6, 235, 30, 131, 251, 2, 117, 4, 176, 7, 235, 21, 131, 249, 6, 117, 7, 131, 251, 0, 117, 4, 176, 8, 235, 7, 131, 251, 1, 117, 2, 176, 9, 91, 139, 229, 93, 195 })
返回 (0)
.子程序 版本判定
.如果 (取系统版本 () = 0)
系统框.内容 = “未知”
.否则
.如果结束
.如果 (取系统版本 () = 1)
系统框.内容 = “Windows95”
.否则
.如果结束
.如果 (取系统版本 () = 2)
系统框.内容 = “Windows98”
.否则
.如果结束
.如果 (取系统版本 () = 3)
系统框.内容 = “WindowsME”
.否则
.如果结束
.如果 (取系统版本 () = 4)
系统框.内容 = “WindowsNT”
.否则
.如果结束
.如果 (取系统版本 () = 5)
系统框.内容 = “Windows2000”
.否则
.如果结束
.如果 (取系统版本 () = 6)
系统框.内容 = “WindowsXP”
.否则
.如果结束
.如果 (取系统版本 () = 7)
系统框.内容 = “Windows2003”
.否则
.如果结束
.如果 (取系统版本 () = 8)
系统框.内容 = “WindowsVista”
.否则
.如果结束
.如果 (取系统版本 () = 9)
系统框.内容 = “Windows7”
.否则
.如果结束
.子程序 _按钮EX1_左键单击
版本判定 ()
|
|