10、20加法练习源码!
本帖最后由 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, 整数型
.全局变量 题序, 整数型
.全局变量 难易度, 整数型 这是什么东西啊 不知道干什么用的 请楼主明示 回复 2# metalcraft
学习交流噻~ 也就是小孩子学学的时候,可以判断对 错的 程序~ 不错,下了,学习用!
页:
[1]