qjytop 发表于 2010-6-24 23:04:21

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, 整数型
.全局变量 题序, 整数型
.全局变量 难易度, 整数型

metalcraft 发表于 2010-6-24 23:42:39

这是什么东西啊 不知道干什么用的 请楼主明示

qjytop 发表于 2010-6-24 23:43:51

回复 2# metalcraft
学习交流噻~

liang520 发表于 2010-6-25 02:14:57

也就是小孩子学学的时候,可以判断对 错的 程序~

凤凰 发表于 2010-7-7 19:56:03

不错,下了,学习用!
页: [1]
查看完整版本: 10、20加法练习源码!