以文本方式查看主题 - 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2) ---- 请大师帮忙解释一下? (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=1402) |
-- 作者:WUZHAN -- 发布时间:2012/2/5 20:04:00 -- 请大师帮忙解释一下? IF([注册名]="",MSGBOX("注册名不能空!",0),If([注册码] <> MID(HEXFORMAT(CODE([机器码])^3*921047) + HEXFORMAT(CODE(GetPY([注册名]))^3*921047),0,4) + "-" + MID(HEXFORMAT(CODE([机器码])^3*921047) + HEXFORMAT(CODE(GetPY([注册名]))^3*921047),4,4) + "-" + MID(HEXFORMAT(CODE([机器码])^3*921047) + HEXFORMAT(CODE(GetPY([注册名]))^3*921047),8,4) + "-" + MID(HEXFORMAT(CODE([机器码])^3*921047) + HEXFORMAT(CODE(GetPY([注册名]))^3*921047),12,4),MSGBOX("注册码错误,请重新输入!",0),MSGBOX("恭喜恭喜!注册成功",0) And CloseWindow() And HideGrid(DOCDIR+"\\pic\\bj.gif",8))) |
-- 作者:lyang70 -- 发布时间:2012/2/6 9:03:00 -- 你把每一个函数命令的语法和意思先了解一下,最后根据If函数的语法说明,应该能懂... |
-- 作者:wjq1072 -- 发布时间:2012/2/6 22:12:00 -- IF([注册名]="", 如果“注册名”等于空, MSGBOX("注册名不能空!",0), 则提示:“注册名不能空!”,否则, If([注册码] <> 如果“注册码”不等于 MID(HEXformAT(CODE([机器码])^3*921047)+HEXformAT(CODE(GetPY([注册名]))^3*921047),0,4)+"-"+ 取《由机器码中第一个字符的ASC代码的3次方再乘以921047后再转换为16进制代码》第1个4位加字符“-” MID(HEXformAT(CODE([机器码])^3*921047)+HEXformAT(CODE(GetPY([注册名]))^3*921047),4,4)+"-"+ 取《由机器码中第一个字符的ASC代码的3次方再乘以921047后再转换为16进制代码》第2个4位加字符“-” MID(HEXformAT(CODE([机器码])^3*921047)+HEXformAT(CODE(GetPY([注册名]))^3*921047),8,4)+"-"+ 取《由机器码中第一个字符的ASC代码的3次方再乘以921047后再转换为16进制代码》第3个4位加字符“-” MID(HEXformAT(CODE([机器码])^3*921047)+HEXformAT(CODE(GetPY([注册名]))^3*921047),12,4), 取《由机器码中第一个字符的ASC代码的3次方再乘以921047后再转换为16进制代码》第4个4位加字符 形成“注册码”:××××-××××-××××-×××× MSGBOX("注册码错误,请重新输入!",0), |
-- 作者:WUZHAN -- 发布时间:2012/2/6 23:54:00 -- 多谢大师 |