|
楼主 |
发表于 2018-11-15 20:53:08
|
显示全部楼层
湖北省武汉市
.版本 2
.程序集 窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
置随机数种子 ()
编辑框1.内容 = 到文本 (取随机数 (0, 9))
编辑框2.内容 = 到文本 (取随机数 (0, 9))
编辑框6.内容 = 到文本 (取随机数 (0, 10))
编辑框5.内容 = 到文本 (取随机数 (0, 10))
i = 到数值 (编辑框1.内容) + 到数值 (编辑框2.内容)
a = 到数值 (编辑框6.内容) - 到数值 (编辑框5.内容)
.如果 (i > 10)
__启动窗口_创建完毕 ()
.否则
返回 ()
.如果结束
.判断开始 (a < 0)
__启动窗口_创建完毕 ()
返回 ()
.默认
.判断结束
.子程序 _按钮1_被单击
.如果 (编辑框3.内容 = 到文本 (i))
信息框 (“ 对”, #警告图标, , )
.否则
信息框 (“错 应该等于” + 到文本 (i), #错误图标, , )
.如果结束
__启动窗口_创建完毕 ()
编辑框3.内容 = “”
.子程序 _按钮2_被单击
.如果 (编辑框4.内容 = 到文本 (a))
信息框 (“ 对”, #警告图标, , )
.否则
信息框 (“错 应该等于” + 到文本 (a), #错误图标, , )
.如果结束
__启动窗口_创建完毕 ()
编辑框4.内容 = “”
.子程序 _编辑框3_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #回车键)
_按钮1_被单击 ()
.如果真结束
.子程序 _编辑框4_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #回车键)
_按钮2_被单击 ()
.如果真结束
|
|