Question

易语言如何判断Windows 操作系统类型然后显示在标签中？

注意的是，标签能显示Windows 7或者 8等等，而不是Windows NT或者返回值，由于在易语言官网下载的资源看不懂，还是想问问大神们（我是初学者）。

Answer 1

.版本 2

.子程序 系统_取操作系统类别1, 整数型, 公开, 【1=Windows 2000】【2=Window XP】【3=Windows Server 2003】【4=Windows Vista】【5=Windows 7】【6=Windows 8】【-1=未知】
.局部变量 lnVer, 整数型
.局部变量 lnVerNum, 双精度小数型
.局部变量 lText, 整数型

lnVer ＝ 右移 (左移 (GetVersion (), 16), 16)
lnVerNum ＝ 位与 (lnVer, 255) ＋ 右移 (位与 (lnVer, 65280), 8) ÷ 10
.判断开始 (lnVerNum ＝ 5)
    lText ＝ 1
.判断 (lnVerNum ＝ 5.1)
    lText ＝ 2
.判断 (lnVerNum ＝ 5.2)
    lText ＝ 3
.判断 (lnVerNum ＝ 6)
    lText ＝ 4
.判断 (lnVerNum ＝ 6.1)
    lText ＝ 5
.判断 (lnVerNum ＝ 6.2)
    lText ＝ 6
.默认
    lText ＝ -1
.判断结束
返回 (lText)
.版本 2

.DLL命令 GetVersion, 整数型, "kernel32.dll", "GetVersion", 公开, ,

.版本 2

.局部变量 a, 整数型

a ＝ 系统_取操作系统类别1 ()

.判断开始 (a ＝ 5)

    标签1.标题=“Windows 7”

.判断 (a ＝ 6)

    标签1.标题=“Windows 8”

.判断 (a ＝ 2)

    标签1.标题=“Windows XP”

.默认

 

标签1就是你要显示的标签名字  上面的代码复制到易语言里面试试把

追问

那个，可以发易语言的e程序吗，复制之后自动隔行了，谢谢。

追答

留邮箱 传不了附件

追问

QQ：1354238538

追答

已发

追问

可以了，非常感谢！