乐易论坛-乐易网易语言培训教程火山PC视窗中文编程交流论坛

 找回密码
 立即注册

手机号登录

用手机号号登陆

微信登录

微信扫码,快速开始

QQ登录

用QQ账号登陆

办理VIP,定制软件,报名培训联系QQ[重磅]2024年实地培训高清培训目录火山PC版乐易模块使用教程
请牢记揰掵佲的QQ号1615457736 1615457734 其他都是骗子有了火山,易语言是否还有必要学习吗?易语言0基础入门课程
火山PC视窗0基础入门课程易语言外挂0基础入门课程火山PC视窗火山HOOK入门课程
易语言误报处理课程QQ空间POST课程2022年火山PC易语言POST系列课程
Android逆向Jeb动态调试0基础课程QQ邮箱网页POST课程WeChat个微Hook实战课程
百日Js加密分析实战课程(无密下载)QQ群POST课程h5游戏WebSocket逆向视频
JavaScript加密特训课程易语言汇编快速入门课程破解实战系列课程
[2024年]火山PC0基础x64位游戏内存辅助开发教程手游模拟器脚本0基础课程易语言加密防破解0基础入门课程
广告位招租联系QQ1615457736  
查看: 7962|回复: 2

[原创开源] 取windows操作系统类别源码

[复制链接]

[原创开源] 取windows操作系统类别源码

[复制链接]
已绑定手机
已实名认证
揰掵佲
等级头衔

等級:乐易运营组

Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20

积分成就
易币
贡献
主题
精华
金钱
积分
34160
注册时间
2014-8-2
最后登录
1970-1-1

勋章墙

2014-10-4 10:21:59 | 显示全部楼层 |阅读模式

据统计90%查看本帖的人,都已经注册本站了哦

您需要 登录 才可以下载或查看,没有账号?立即注册

×
  1. .版本 2

  2. .程序集 窗口程序集_启动窗口

  3. .子程序 _按钮1_被单击

  4. 编辑框1.内容 = 取操作系统类型 ()

  5. .子程序 取操作系统类型, 文本型, 公开
  6. .局部变量 lnVer, 整数型
  7. .局部变量 lnVerNum, 双精度小数型
  8. .局部变量 lText, 文本型

  9. lnVer = 右移 (左移 (GetVersion (), 16), 16)
  10. lnVerNum = 位与 (lnVer, 255) + 右移 (位与 (lnVer, 65280), 8) ÷ 10
  11. .判断开始 (lnVerNum = 5)
  12. lText = “Windows 2000”
  13. .判断 (lnVerNum = 5.1)
  14. lText = “Windows XP”
  15. .判断 (lnVerNum = 5.2)
  16. lText = “Windows Server 2003”
  17. .判断 (lnVerNum = 6)
  18. lText = “Windows Vista”
  19. .判断 (lnVerNum = 6.1)
  20. lText = “Windows 7”
  21. .判断 (lnVerNum = 6.2)

  22. lText = “Windows 8”
  23. .默认
  24. lText = “未知操作系统”
  25. .判断结束
  26. 返回 (lText)
复制代码


回复

使用道具 举报

已绑定手机
已实名认证
无极超哥
等级头衔

等級:编程起步

Rank: 5Rank: 5

积分成就
易币
贡献
主题
精华
金钱
积分
627
注册时间
2014-9-20
最后登录
1970-1-1

勋章墙

2014-10-4 15:16:50 | 显示全部楼层
不错啊!!!!!
回复

使用道具 举报

已绑定手机
SJJ
等级头衔

等級:编程学徒

Rank: 3Rank: 3

积分成就
易币
贡献
主题
精华
金钱
积分
295
注册时间
2014-8-21
最后登录
1970-1-1

勋章墙

2014-11-2 17:02:14 | 显示全部楼层
点赞!
回复

使用道具 举报

如果懒得打字,请选择右侧内容快捷回复 提醒:以任何方式进行『恶意灌水』的行为,进行封号处理
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

热点推荐上一条 /5 下一条

QQ|网站地图|手机版|小黑屋|乐易论坛-乐易网 | 湘ICP备19007035号

拒绝任何人以任何形式在本论坛发表与中华人民共和国法律相抵触的言论,本站内容均为会员发表,并不代表乐易立场!

娄底市乐易网络科技有限公司声明:乐易原创培训课程版权均为我公司所有,未经许可,不得擅自翻录,盗版,破解本站课课程,我们将保留法律诉讼的权利

GMT+8, 2024-5-17 11:55 , Processed in 0.049323 second(s), 41 queries .

Powered by Discuz! X3.4

Copyright © Tencent Cloud.

快速回复 返回顶部 返回列表