变量1 = 到整数 (编辑框1.内容)
变量2 = 到整数 (编辑框2.内容)变量3 = 到整数 (编辑框3.内容)变量4 = 到整数 (编辑框4.内容)变量5 = 到整数 (编辑框5.内容)变量6 = 到整数 (编辑框6.内容)变量7 = 到整数 (编辑框7.内容)变量8 = 到整数 (编辑框8.内容)变量9 = 到整数 (编辑框9.内容)变量10 = 到整数 (编辑框10.内容)变量11 = 到整数 (编辑框11.内容)变量12 = 到整数 (编辑框12.内容)变量13 = 到整数 (编辑框13.内容)变量14 = 到整数 (编辑框14.内容)变量15 = 到整数 (编辑框15.内容)变量16 = 到整数 (编辑框16.内容)变量17 = 到整数 (编辑框17.内容)变量18 = 到整数 (编辑框18.内容)变量100 = 变量1 × 7 + 变量2 × 9 + 变量3 × 10 + 变量4 × 5 + 变量5 × 8 + 变量6 × 4 + 变量7 × 2 + 变量8 × 1 + 变量9 × 6 + 变量10 × 3 + 变量11 × 7 + 变量12 × 9 + 变量13 × 10 + 变量14 × 5 + 变量15 × 8 + 变量16 × 4 + 变量17 × 2变量 = 变量100 % 11.如果真 (变量 = 0) 校验码 = 1.如果真结束.如果真 (变量 = 1) 校验码 = 0.如果真结束.如果真 (变量 = 2) 校验码 = 10.如果真结束.如果真 (变量 = 3) 校验码 = 9.如果真结束.如果真 (变量 = 4) 校验码 = 8.如果真结束.如果真 (变量 = 5) 校验码 = 7.如果真结束.如果真 (变量 = 6) 校验码 = 6.如果真结束.如果真 (变量 = 7) 校验码 = 5.如果真结束.如果真 (变量 = 8) 校验码 = 4.如果真结束.如果真 (变量 = 9) 校验码 = 3.如果真结束.如果真 (变量 = 10) 校验码 = 2.如果真结束.如果 (校验码 = 变量18) 信息框 (“地球上确实存在这个身份证号码”, 0, ).否则 信息框 (“地球上不存在这个身份证号码,您是从外星来的吧”, 0, ).如果结束