TC官方合作论坛

 找回密码
 立即注册
楼主: 13857750526

[讨论] [帅哥美女看过来]利用win API实现无边框

  [复制链接]
发表于 2018-6-13 00:15:15 | 显示全部楼层
function 验证身份证(sfID)
    var strJiaoYan
    var intQuan
    strJiaoYan = array("1", "0", "X", "9", "8", "7", "6", "5", "4", "3", "2")
    intQuan = array(7, 9, 10, 5, 8, 4, 2, 1, 6, 3, 7, 9, 10, 5, 8, 4, 2, 1)
    var strTemp
    var intTemp
    var i
    if (strlen(sfID) != 18)
        return false
    else
        strTemp = strleft(sfID, 17)
    end
    for (i = 0; i<17; i=i++)
        intTemp = intTemp + strsub(strTemp, i, i + 1) * intQuan[i]
    end   
    intTemp = intTemp % 11
    var getCheckCode = strTemp & strJiaoYan[intTemp]
    if (strJiaoYan[intTemp] != strright(sfID, 1))
        return false
    else
        return true
    end
end
回复 支持 反对

使用道具 举报

发表于 2018-6-22 13:37:53 | 显示全部楼层
太好了。。。。。。。。。。。。
回复

使用道具 举报

发表于 2018-6-23 09:36:14 | 显示全部楼层
谢谢,学习了
回复 支持 反对

使用道具 举报

发表于 2018-7-10 14:30:25 | 显示全部楼层
666666666
回复

使用道具 举报

发表于 2018-7-10 23:51:06 | 显示全部楼层
.000000000000
回复 支持 反对

使用道具 举报

发表于 2018-7-20 00:22:47 | 显示全部楼层
学习
回复

使用道具 举报

发表于 2018-7-21 00:26:12 | 显示全部楼层
来]利用win API实现无边框 [修改]
回复 支持 反对

使用道具 举报

发表于 2018-8-17 00:43:37 | 显示全部楼层
看看效果..
回复

使用道具 举报

发表于 2018-8-17 16:26:47 | 显示全部楼层
啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊啊
回复 支持 反对

使用道具 举报

发表于 2018-9-1 06:19:27 | 显示全部楼层
6666666666666666
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18045623号)

GMT+8, 2024-5-11 06:55 , Processed in 0.049402 second(s), 19 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

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