|
本帖最后由 qjytop 于 2010-6-24 23:47 编辑
10、20加法练习源码!适合于小孩儿练习!我还要进一步改进!
.版本 2
.程序集 窗口程序集1
.子程序 __启动窗口_创建完毕
难易度 = 10
出题 ()
.子程序 _按钮3_被单击
图片框1.图片 = { }
标签5.标题 = “”
编辑框1.内容 = “”
难易度 = 10
题序 = 0
编辑框1.内容 = “”
出题 ()
.子程序 _按钮4_被单击
图片框1.图片 = { }
标签5.标题 = “”
编辑框1.内容 = “”
难易度 = 20
编辑框1.内容 = “”
题序 = 0
出题 ()
.子程序 出题
置随机数种子 ()
数1 = 取随机数 (0, 难易度)
数2 = 取随机数 (0, 难易度)
数3 = 数1 + 数2
标签1.标题 = 到文本 (数1)
标签3.标题 = 到文本 (数2)
题序 = 题序 + 1
标签6.标题 = 到文本 (题序)
.子程序 _按钮1_被单击
图片框1.图片 = { }
标签5.标题 = “”
编辑框1.内容 = “”
出题 ()
按钮1.可视 = 假
.子程序 _按钮2_被单击
.如果真 (取文本长度 (编辑框1.内容) = 0)
信息框 (“请作答”, 0, )
返回 ()
.如果真结束
数4 = 到数值 (编辑框1.内容)
.如果 (数3 = 数4)
图片框1.图片 = #图片1
标签5.标题 = “对了!请继续答题!”
按钮1.可视 = 真
.否则
图片框1.图片 = #图片2
标签5.标题 = “错了,请重新计算得出正确答案!”
.如果结束
.版本 2
.全局变量 数1, 整数型
.全局变量 数2, 整数型
.全局变量 数3, 整数型
.全局变量 数4, 整数型
.全局变量 题序, 整数型
.全局变量 难易度, 整数型 |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?注册帐号
×
评分
-
查看全部评分
|