按键精灵脚本自动出口算题练习
巧用VBA制作口算练习课件
巧用VBA制作口算练习课件作者:马致明木沙江·加帕尔来源:《中国教育信息化·基础教育》2008年第06期摘要:口算训练是小学数学教学的重要内容,多做练习则是提高口算速度和口算能力的有效途径,通常学生快速完成的口算题只有等到教师或家长批改后才能知道结果,不仅完成口算的时长无从知晓,急于知道结果的学生的好奇心也得不到满足,兴趣也难以提高。
笔者巧用Excel的数据库功能和VBA编程功能制作了一款口算练习课件,集出题、练习、评判、记录、语音表扬等功能为一体,简单又实用,文中就其特色和制作方法作了详细的介绍。
关键词:Excel;数据库;VBA编程;小学数学;口算课件中图分类号:G434 文献标识码:B 文章编号:1673-8454(2008)12-0049-03一、前言口算是一种不借助于任何计算工具,只凭思维进行计算并得出结果的计算方法。
口算既是笔算、估算和简便运算的基础,也是计算能力的重要组成部分,它能训练学生机智敏捷的思维品质。
《全日制义务教育数学课程标准》指出:“应重视口算,加强估算,提倡算法多样化。
”并明确规定了各个学段口算应达到的目标。
加强口算训练、培养学生的口算兴趣是提高学生口算速度和口算能力的有效途径。
但是,通常情况下学生快速完成的口算题只有等到教师或家长批改后才能知道结果,一方面完成口算用了多少时间无从知晓,另一方面急于知道结果的学生的好奇心得不到满足,主动练习的兴趣也难以保证。
经过实践,笔者利用Excel的数据库功能和VBA编程功能制作了一款简单、实用的小学数学口算练习课件。
推广使用后效果良好,得到了家长和教师的好评。
现将其设计思想和制作方法介绍给各位同行,希望对大家能有所启示。
二、Excel的数据库功能和VBA编程1.Excel的数据库功能Excel是微软开发的一款电子报表软件,用其创建的工作簿类似于数据库文件,其中的工作表Sheet实际上就是一个二维关系表Table,各个表之间具有关联性;恰当地利用其可视化编程环境设计输入输出界面就可以创建一个数据库应用程序。
二下口算2按F9自动出题
乘除
参数设定
加法碱法加法比例第一位第二位随机数下限0%11
随机数上限100100999
进退位比例80%
四则(2上口算4)加减法比例100%
随机数下限(一年级)11
随机数上限(一年级)88
说明
后面的每个表的数字范围都来自于这里的设定
下限的数字必须小于上限
在“公式”标签栏里面,有一个“开始计算”按钮,每按一次,自动重新出题
或者按键盘上的F9按钮,每按一次,就可以重新出题一次
版本:
20141104
局部的文字描述更正和美化
20141030
增加设定表格中数据的有效性判断
修正不进退位公式中的Bug
乘法可以分别设定两个数字的范围,除法则相应更改
20141029
进一步优化加减法不退位出题的公式
20141028
优化了加减法的抽题算法,增加了可以设定加法比例
20141014
20141015增加了加减法的进退位生成方式,可以生成100%的包
将 randbetween函数修改为 round(rand()*(上限-下
20141018
增加了一个表格“加减(进退位混合)”,提升进退
20141027
增加除法
龙锦小学二(2)班徐刘阳
乘法比例
50%
范围,除法则相应更改
加了可以设定加法比例的参数
式,可以生成100%的包含进退位的加减法
ound(rand()*(上限-下限)+下限,0),以保证office2003能正常打开位混合)”,提升进退位计算比例,并且可控。
按键精灵四级选择题
5、关于子程序的描述错误的是?C
A. 函数可以代替子程序的作用
B. 应用多线程时需要用到子程序
C. 2个子程序之间可以任意跳转(goto)
D. 子程序内定义的变量是局部变量
7、判断一个字符串是否为数字可以使用以下哪个函数?A
A. IsNumeric
B. IsArray
Dim intX
Dim intY
For intX = 0 To 15
intX = intX + 1
intY = intY + 1
Next
17、关于QUI输入框的描述哪个是错误的?
A. 可以在事件外修改输入框的背景颜色
18、关于后台坐标的描述,哪一个是不正确的?
x1=15
a=5
x1=x1+a
End Function
23、脚本中只有一行代码DimEnv a:MsgBox a,弹出的值为3,可能的原因是?
A. 其他脚本中给环境变量a赋值了
24、如下代码,c的值为?D. True
a = 1 : b = - 1
c = a or b
D. 环境变量可以在同一个按键精灵或者小精灵中跨脚本使用
15、关于环境变量的描述,哪个是错误的?A
A. 环境变量的类型可以是数组 不支持数组定义为环境变量
B. 环境变量的值可以改变
C. IsNull
D. IsDate
8、以下描述错误的是?A
A. 脚本内子程序数量越少运行速度越快
B. 脚本内增加注释可以提高代码的可读性
C. 获得字符串长度的函数是len,获得数组最大可用下标的函数是Ubound
加减法口算题-随机生成器(一)
加减法口算题-随机生成器(一)随着教育体制转变和信息技术的不断发展,数字化学习工具也越来越普及,为教学提供了更多的可能性。
其中,口算题的练习在小学阶段就显得尤为重要,对于孩子们的数学基础能力有着十分关键的作用。
今天,我们来介绍一个加减法口算题随机生成器,以帮助家长和老师更好地辅导孩子。
一、加减法口算题的重要性在小学阶段,加减法口算题是数学学习的基础。
它不仅在学习数学知识上起到了锻炼孩子大脑思维能力的作用,还可以在思考方式上培养孩子的逻辑思维和创造力,提升孩子对数字认识、数算运算问题的敏感性和理解能力。
同时,口算题也是评价孩子们数学成绩的一项重要指标。
因此,加强口算题训练,对于孩子们的数学学习和身心健康成长均具有积极意义。
二、加减法口算题随机生成器是什么?加减法口算题随机生成器是一种使用计算机自动生成加减法口算题的工具,可以随机生成和组合加法和减法计算题目。
通过这个工具,我们可以自由选择加减法的数字范围,保证每一组题目的随机性,帮助孩子们进行有针对性的训练,提高他们的计算能力。
三、加减法口算题随机生成器的功能和使用1. 根据不同内容需求生成高质量的加减法口算题。
随机生成器提供了不同的数字范围、难度级别的选择,可以根据需要进行组合和调整。
如:选择随机数字范围,可以指定加减数的范围及运算符的数目;选择难度级别,可以根据孩子的学习情况,选择难度较低或较高的口算题。
2. 帮助孩子更加深入地理解加减法运算规则随机生成器随机生成的口算题,使孩子们不会对计算题目产生固定化印象,每次练习均能延展孩子不同的思维方式,避免孩子们截胡计算题目,同时避免孩子们对口算题目的模式化记忆,从而充分开发其灵活性,更加深入地理解了口算运算规则。
3. 帮助孩子提高计算速度和准确度通过不断练习口算题,孩子们可以在加减法运算中更快速地计算,提高计算速度和准确度,从而避免出现因口算题需要找计算机或口算板等辅助工具而影响计算的情况,充分发挥孩子们的计算能力。
js编码 快速生成口算题
js编码快速生成口算题
"js编码快速生成口算题" 这句话的意思是使用JavaScript(JS)编程语言来快速生成口算题。
口算题通常是指简单的数学运算题,如加法、减法、乘法和除法等。
这些题目通常用于训练学生的计算能力和基本的数学技能。
使用JavaScript来快速生成口算题可以通过编写代码来实现。
具体实现方式取决于你的需求和目标。
以下是一些生成口算题的常见方法:
1.随机数生成:使用JavaScript的Math对象来生成随机数,用于计算题的
数字部分。
例如,Math.random()可以生成一个0到1之间的随机数,Math.floor()可以将一个数向下取整。
2.运算符生成:根据需要选择加法、减法、乘法或除法等运算符,并将其与
随机数一起用于构建计算题。
3.题目格式化:将生成的数字和运算符组合成问题的格式,例如 "3 + 4 = ?"。
可以使用字符串拼接或模板字符串来实现。
4.题目数量控制:根据需要生成一定数量的口算题,可以使用循环结构来实
现。
总结:使用JavaScript编码可以快速生成口算题,通过随机数生成、运算符选择和题目格式化等技术,可以自动化地创建一定数量和难度的口算题目。
这对于教学、练习或测试学生的数学计算能力非常有用。
口算自动生成器
口算自动生成器Oral calculator大小:57.7KB | 2019-06-26 05:27:49小学口算题库生成器,使用Python编写,可脱离Python环境运行。
大小:9.64MB | 2019-05-19 20:12:41该软件支持100以内加减法口算题,支持2位数横式运算(100题),3位数横式运算(60题),竖式运算(50题)和数字填空(80题);生成的内容为Word文档,可以选择保存或打印。
大小:15.41MB | 2020-07-17 19:55:15适合一二年级数学口算题库,有加减乘除加填空选项!大小:64.01KB | 2019-05-17 00:48:33数学口算生成器小项目,欢迎下载!大小:2.11KB | 2020-09-27 19:38:34小学口算题库生成器,Python编写,可脱离Python环境独立运行。
大小:9.47MB | 2019-04-28 19:31:42家里有上小学的挺好用的,自动生成算数题,省的家长再一道道写啦大小:222KB | 2019-05-19 20:12:50小学阶段,几乎大部分的学校每周都要求学生上交口算题,每张100道,这对家长是个很大的挑战。
本工具的功能,可以让家长简单的几次鼠标点击,就可以设置不同难度,比如10以内,20以内等,1~4次加减法的单加大小:10.99MB | 2020-06-12 12:08:59padgen是一个pad文件自动生成器,用于软件上传发布大小:3.33MB | 2019-04-19 21:36:59sitemap自动生成器,简单好用,seo必备工具大小:82.71KB | 2019-01-12 23:14:27一个可以自动生成UML的软件。
一个基于Java的廉价常用UML建模工具。
大小:332.82KB | 2019-01-12 23:15:30这个工具可以生成flash动画,而不需要动的flash开发知识~~~大小:2.42MB | 2019-01-18 11:21:08在原来的基础上做了一些修改。
按键精灵1--6级问题详解
以下哪一个不是按键精灵的产品? 按键箱子录制的脚本没有以下哪个功能? 记录鼠标特征码下列哪一个命令不属于"全部命令"? 内核命令按键精灵自带的抓图工具是? 按键抓抓哪一种方法能够找到命令的帮助说明? 在全部命令中搜索命令,点击后帮助说明会出现在编辑器下方.按键精灵不可以在以下哪个系统中使用? Linux可以使用神盾功能的程序是? 小精灵商业版旧版本的脚本导入到新版本中,以下哪种方法不可以纠正语法错误? 使用"自动缩进"功能WaitClick命令的含义是? 按任意鼠标键继续哪一类脚本程序是按键精灵官方授予销售权的? 小精灵商业版只要在编辑脚本,切换输入法时,按键精灵就卡住了,可能是下列哪一个原因? Plugin目录下装有不是官方提供的插件引起的关于加密脚本的描述,下列是错误的是? 只有会员输入密码可以解开加密脚本GetLastClick命令的含义是? 检测上次按过的鼠标键按键精灵生成的小精灵程序的后缀名是? EXE按键精灵会员不能享受的论坛权限是? 可以访问按键精灵“版版家园”专区享受版主资源网页按键精灵是下列哪一个程序? wqm.exe按键精灵的产品包括以下哪一个? 按键盒子按键精灵是下列哪一个程序? 按键精灵9.exe按键精灵会员卡注册码,没有以下哪一种? 天卡(1天)UnlockMouse命令的含义是? 解除锁定鼠标位置按键精灵会员不能享受的资源是? 免费小精灵的源代码RightUp命令的含义是? 右键弹起按键精灵的功能不包括? 自动发明汽车、飞机、火箭等机器按键精灵能兼容下列哪一种语言? VBS不能用抓抓工具直接获取的是? PID关于按键精灵的描述,以下正确的是? 按键精灵是一款绿色的模拟键盘鼠标操作的软件脚本编辑界面上没有的按钮是?启动与取色判断命令没有直接关系的参数是? 按键码以下哪种方式可以在脚本编辑界面中获取到新的插件? 点击"资源库"按钮,然后导入需要的插件LeftClick命令的含义是? 左键单击按键精灵官方网站的网址是? /RestoreMousePos命令的含义是? 恢复上次保存的鼠标位置如果按键精灵在某些环境失效,可以使用下列哪个工具? 神盾SaveMousePos命令的含义是? 保存当前鼠标所在位置GetCursorPos命令的含义是? 得到鼠标位置坐标键盘命令的类型不包括? 锁定按键精灵里运算符乘号是? *KeyPress命令的含义是? 按键MiddleClick命令的含义是? 中键单击LockMouse命令的含义是? 锁定鼠标位置按键精灵会员不能享受的功能是? 脚本编写服务GetCursorShape命令的含义是? 得到鼠标形状按键精灵自带的用户界面叫做什么? QUI界面RightClick命令的含义是? 右键单击按键精灵里运算符减号是? -按键精灵默认的启动热键是? F10属于"全部命令"的是? 我的命令库“录制”功能不能录制的内容是? 记录鼠标指向的窗口句柄按键抓抓是下列哪一个程序? picker.exe想要知道脚本是否存在错误,应该使用下列哪个功能? 调试以下哪种方式不可以获得论坛银币? 发布大量无内容的主题贴按键精灵里运算符除号是? /按键精灵会员不能享受的技术支持是? 技术人员上门服务按键精灵自带的功能不包括以下哪一个? 路由功能GetLastKey命令在获取一次ANSI字符代码后继续循环执行返回值是?0变量的定义,以下哪个是正确的? dim a下列哪一种方法不能够正确输入命令? 鼠标右键单击命令按键精灵的功能是?模拟鼠标键盘操作的工具MoveR命令的含义是? 相对移动关于小精灵去广告的描述,下列正确的是? 会员用户在“制作按键小精灵”界面上->更多设置->选择会员去广告(是)即可按键精灵里运算符加号是? +对小精灵的描述,以下是正确的? 按键小精灵是把按键精灵的脚本打包成一个可单独执行的EXE程序,便于传播以及提供给新手使用。
自动生成口算题
自动生成口算题口算题是指在一个小于十以内的范围内进行加减乘除运算的题目。
它对于培养学生的计算能力和思维能力具有重要意义。
而现在,随着技术的发展,自动生成口算题已经成为一种趋势。
下面将介绍自动生成口算题的方法和意义。
自动生成口算题的方法多种多样,其中一个常用的方法是利用编程语言生成。
通过编写一段程序,我们可以根据自己的要求生成口算题。
具体步骤如下:首先,确定口算题的类型,如加法、减法、乘法、除法等。
然后,确定题目的数量和难度级别,如一年级、二年级等。
接下来,使用编程语言编写一个循环程序,根据设定的条件随机生成题目。
最后,将生成的口算题输出为文本或图片格式。
自动生成口算题的意义在于提高口算能力和思维能力。
通过大量的口算题练习,学生可以熟练掌握加减乘除运算的方法和技巧,同时提高计算速度和准确度。
此外,口算题还可以培养学生的思维能力和逻辑思维能力,让他们在解决问题的过程中锻炼思维能力和创新思维。
自动生成口算题还可以提高学习效率和趣味性。
传统的口算题通常需要教师手工制作,耗费时间和精力。
而利用计算机自动生成口算题,可以大大节省教师的时间和精力,提高教学效率。
同时,口算题生成的随机性和多样性,可以增加学生对口算的兴趣和参与度,提高学习的趣味性。
总之,自动生成口算题是一个方便、高效、有意义的方法。
它可以提高学生的口算能力和思维能力,增加学习的趣味性,对于学生的数学学习具有重要的促进作用。
同时,我们也要注意合理利用自动生成口算题这一技术,因为过于依赖自动生成可能会减少学生的手工计算能力。
因此,我们应该在自动生成口算题和手工计算之间取得一个平衡,让学生既能获得便利和效率,又能够保持和提高手工计算的能力。
一年级数学10以内加减法口算题网页自动生成程序
一年级数学10以内加减法口算题网页自动生成程序一、第一步:如图,单击鼠标右键,新建一个文本文档。
二、第二步:将以下内容复制黏贴到文本文档。
<!—将以上内容复制到文本文档--><html><head id="Head1" runat="server"><title></title></head><body><form id="form1" runat="server"><div id="ha1" style="float:left;width:100px;margin-left:150px;margin-top:50px;font-size:20px;font-weight:bold;height:30px;line-height:30px;"></div><div id="ha2" style="float:left;width:100px;font-size:20px;margin-top:50px;font-weight:bold;height:30px;line-height:30px"></div> <div id="ha3" style="float:left;width:100px;font-size:20px;margin-top:50px;font-weight:bold;height:30px;line-height:30px"></div> <div id="ha4" style="float:left;width:100px;font-size:20px;margin-top:50px;font-weight:bold;height:30px;line-height:30px"></div> </form></body></html><script type="text/javascript">var JiaJianNum = 0;var TenNineNum = 0;var n = 0;var Str = "";var a, b;while (1 < 5) {JiaJianNum = JiaJianNum + 1;JiaJian = JiaJianNum % 2;TenNineNum= TenNineNum + 1;TenNine = TenNineNum % 4;if (TenNine == 0){a = parseInt(10 * Math.random());b = parseInt(10 * Math.random());}if (TenNine == 1){a = parseInt(10 * Math.random()+1);b = parseInt(10 * Math.random()+1); }if (TenNine == 2){a = parseInt(10 * Math.random());b = parseInt(10 * Math.random()+1); }if (TenNine == 3){a = parseInt(10 * Math.random()+1);b = parseInt(10 * Math.random()); }if (JiaJian == 1){if (a != 0 || b != 0){if (a + b <= 10){n = n + 1;StrTemp = Str;Str = a + "+" + b + "=" + "<br>";if (Str != StrTemp) {if (n <= 20) {document.getElementById("ha1").innerHTML = document.getElementById("ha1").innerHTML + Str;}if (n > 20 && n <= 40) {document.getElementById("ha2").innerHTML = document.getElementById("ha2").innerHTML + Str;}if (n > 40 && n <= 60) {document.getElementById("ha3").innerHTML = document.getElementById("ha3").innerHTML + Str;}if (n > 60 && n <= 80) {document.getElementById("ha4").innerHTML = document.getElementById("ha4").innerHTML + Str;}}}else{JiaJianNum = JiaJianNum - 1;TenNineNum = TenNineNum - 1;}}}if (JiaJian == 0) {if (a != 0 || b != 0) {if (a - b < 0) {n = n + 1;StrTemp = Str;Str = b + "-" + a + "=" + "<br>";if (Str != StrTemp) {if (n <= 20) {document.getElementById("ha1").innerHTML = document.getElementById("ha1").innerHTML + Str;}if (n > 20 && n <= 40) {document.getElementById("ha2").innerHTML = document.getElementById("ha2").innerHTML + Str;}if (n > 40 && n <= 60) {document.getElementById("ha3").innerHTML = document.getElementById("ha3").innerHTML + Str;}if (n > 60 && n <= 80) {document.getElementById("ha4").innerHTML = document.getElementById("ha4").innerHTML + Str;}}}else {n = n + 1;StrTemp = Str;Str = a + "-" + b + "=" + "<br>";if (Str != StrTemp) {if (n <= 20) {document.getElementById("ha1").innerHTML = document.getElementById("ha1").innerHTML + Str;}if (n > 20 && n <= 40) {document.getElementById("ha2").innerHTML = document.getElementById("ha2").innerHTML + Str;}if (n > 40 && n <= 60) {document.getElementById("ha3").innerHTML = document.getElementById("ha3").innerHTML + Str;}if (n > 60 && n <= 80) {document.getElementById("ha4").innerHTML = document.getElementById("ha4").innerHTML + Str;}}}}}if (n >= 80) break;}</script><!—将以上内容复制到文本文档-->第三步:修改文本文档的扩展名,如图1. 双击打开我的电脑2. 选择工具,文件夹选项3.选择查看4.向下拖动滚动条,找到“点击隐藏已知文件类型扩展名”5点击“绿色对号”,将绿色对号去掉,点击确定6右键单击新建文本文档,选择重命名7退格键将txt去掉,换成html8选择是第四步:打开新建文本文档,如果没有刷新出题来,说明你的电脑限制了javascript运行,如图,单击右键单击黄条处,选择允许阻止的内容(A)…第五步:成功,自动刷新出80道题,每次刷新出题不同,有加法,有减法,可打印,可复制word中。
按键精灵题库快速找题方法
按键精灵题库快速找题方法一、题目1。
1. 题目内容:已知函数y = 2x + 3,求当x = 5时y的值。
2. 解析:将x = 5代入函数y=2x + 3中,得到y=2×5+3 = 10 + 3=13。
二、题目2。
1. 题目内容:解方程3x - 5 = 7。
2. 解析:首先将方程两边同时加5,得到3x-5 + 5=7+ 5,即3x=12,然后两边同时除以3,解得x = 4。
三、题目3。
1. 题目内容:一个三角形的底是8厘米,高是6厘米,求这个三角形的面积。
(人教版小学数学知识点:三角形面积公式)2. 解析:根据三角形面积公式S=(1)/(2)ah(其中a为底,h为高),将a = 8厘米,h = 6厘米代入公式,可得S=(1)/(2)×8×6=24平方厘米。
四、题目4。
1. 题目内容:化简式子3(a + 2b)-2(2a - b)。
2. 解析:先使用乘法分配律展开式子,得到3a+6b - 4a + 2b,然后合并同类项,(3a-4a)+(6b + 2b)=-a + 8b。
五、题目5。
1. 题目内容:在直角坐标系中,点A(3, - 2)关于x轴对称的点的坐标是多少?(人教版初中数学知识点:轴对称)2. 解析:关于x轴对称的点,横坐标相同,纵坐标互为相反数。
所以点A(3,-2)关于x轴对称的点的坐标是(3,2)。
六、题目6。
1. 题目内容:计算√(16)+sqrt[3]{-8}。
2. 解析:√(16)=4,sqrt[3]{-8}=- 2,所以√(16)+sqrt[3]{-8}=4+(-2)=2。
七、题目7。
1. 题目内容:如果一个多边形的内角和是720^∘,这个多边形是几边形?(人教版初中数学知识点:多边形内角和公式)2. 解析:多边形内角和公式为(n - 2)×180^∘(n为边数且n≥slant3且n为整数)。
设这个多边形边数为n,则(n - 2)×180^∘=720^∘,解得n - 2=4,n = 6,所以这个多边形是六边形。
按键精灵一级考试答案
按键精灵一级考试答案一、单选题(每题2分,共10分)1. 按键精灵中,用于循环执行某段代码的命令是:A. 循环B. 判断C. 等待D. 跳转答案:A2. 在按键精灵中,如何表示按键按下事件?A. KeyDownB. KeyUpC. KeyPressD. KeyRelease答案:A3. 按键精灵支持的脚本语言是:A. VBScriptB. JavaScriptC. PythonD. Lua答案:A4. 按键精灵中,用于获取当前系统时间的函数是:A. GetTimeB. GetDateC. GetDateTimeD. GetNow答案:C5. 在按键精灵中,如何表示按键弹起事件?A. KeyDownB. KeyUpC. KeyPressD. KeyRelease答案:B二、判断题(每题1分,共5分)1. 按键精灵可以模拟鼠标和键盘操作。
(对)2. 按键精灵不支持循环结构。
(错)3. 按键精灵中,可以使用“等待”命令来暂停脚本执行。
(对)4. 按键精灵只能模拟键盘操作,不能模拟鼠标操作。
(错)5. 按键精灵支持多线程操作。
(对)三、填空题(每题2分,共10分)1. 在按键精灵中,使用________命令可以结束当前循环。
答案:ExitLoop2. 按键精灵中,________函数用于获取当前的系统时间。
答案:GetDateTime3. 按键精灵支持的脚本语言是________。
答案:VBScript4. 在按键精灵中,使用________命令可以创建一个新的循环。
答案:For 或 While5. 按键精灵中,________函数用于获取当前的系统日期。
答案:GetDate四、简答题(每题5分,共20分)1. 请简述按键精灵的主要功能。
答案:按键精灵是一款模拟鼠标和键盘操作的自动化脚本工具,它可以帮助用户自动执行重复性的任务,提高工作效率。
2. 按键精灵中如何实现条件判断?答案:在按键精灵中,可以使用If...Then...Else...End If结构来实现条件判断。
口算生成器(带答案的)
2 2 2 2 3 3 3 2 3 2 2 3 3 3 3 3 2 2 3 2 2 2 3 3 3 3 2 2 2 3 3 3 2 3 2 3 3 2 3 3 2 3 3 2 3 3 3
2 1 4 1 2 2 3 3 3 1 4 4 4 2 4 3 3 2 1 4 4 3 2 2 4 4 1 1 2 3 3 4 3 2 1 1 2 3 3 3 2 3 4 4 3 2 2
5 35 80 60 51 89 38 26 84 95 35 95 49 86 5 34 35 1 80 92 41 23 68 48 34 86 19 85 97 62 9 42 31 74 39 81 13 42 56 6 76 75 2 68 60 36 75
14 71 114 127 134 144 56 116 104 175 90 151 71 112 88 74 114 17 118 168 84 44 150 146 60 153 49 148 113 147 72 53 99 150 71 171 77 51 114 61 162 169 54 112 64 41 168
口算练习纸生成器 V1.0
题目形式:2 题目类型:1 1 1 2 3 4 第一位数 1 1 1 1 到 到 到 到 99 99 6 36 从 从 从 从 算式 加法 减法 乘法 除法 2 5 6 7 8 填空 3 混合型
加减混合 9 加减乘除 乘混加减 除混加减 乘除混合 第二位数 1 1 1 1 到 到 到 到 99 99 6 6
9 36 34 67 83 55 18 90 20 80 55 56 22 26 83 40 79 16 38 76 43 21 82 98 26 67 30 63 16 85 63 11 68 76 32 90 64 9 58 55 86 94 52 44 4 5 93
自动生成口算题
自动生成口算题1. 简介自动生成口算题是指利用计算机程序自动产生一系列口算题目,用于提供给学生进行计算练习。
口算题是学生学习数学的基础,通过反复练习口算题,可以提高学生的计算能力、逻辑思维能力和数学运算技巧。
自动生成口算题可以大大减轻教师的工作负担,提高教学效率,同时也可以根据学生的不同水平生成不同难度的口算题,满足个性化教学的需求。
2. 自动生成口算题的原理自动生成口算题的原理是利用计算机程序生成一系列随机的数学算式,其中包含了不同的运算符号(加、减、乘、除)和不同的数值。
生成口算题的程序可以根据教学要求设置口算题的难度、类型和数量等参数,以满足不同年级、不同学生的学习需求。
3. 自动生成口算题的步骤自动生成口算题的步骤如下:步骤一:确定口算题的类型口算题可以包括加法、减法、乘法和除法等不同类型。
根据教学要求和学生的学习水平,确定口算题的类型。
步骤二:确定口算题的难度口算题的难度可以通过设置数值的范围和运算符的个数来控制。
根据学生的学习水平,确定口算题的难度。
步骤三:生成口算题根据口算题的类型和难度,利用计算机程序生成一系列随机的口算题。
生成口算题时需要注意口算题的合理性,例如除法口算题的除数不能为零,减法口算题的被减数不能小于减数等。
步骤四:排版口算题将生成的口算题按照一定的格式进行排版,使其易于阅读和解答。
口算题的排版可以包括题目编号、题目内容、空白答题区域等。
步骤五:输出口算题将排版好的口算题输出为纸质或电子文档,以便教师进行打印或分发给学生。
4. 自动生成口算题的优势自动生成口算题具有以下优势:提高效率自动生成口算题可以大大减轻教师的工作负担,提高教学效率。
教师无需手工编写口算题,只需设置好口算题的类型和难度,即可自动生成大量口算题。
个性化教学自动生成口算题可以根据学生的不同水平生成不同难度的口算题,满足个性化教学的需求。
对于学习能力较强的学生,可以生成一些较难的口算题进行挑战;对于学习能力较弱的学生,可以生成一些较简单的口算题进行巩固练习。
按键精灵开发者认证三级部分试题及答案
按键精灵开发者认证三级部分试题及答案1、下列哪一个常数是回车换行符?C. vbCrLf2、关于自定义变量的描述以下哪一个是正确的?C. 自定义变量可以是数字或者字符串4、返回值=Int(3\2),求返回值是多少?B. Int(3/2)5、当str = "(1+2*3-1)/2",Eval(str)返回值为?A. 36、以下不属于键鼠命令的是?A. Call Plugin.Bkgnd.SendString(Hwnd, 0)7、以下关于按键抓抓描述错误的是?支持后台找色找图效果测试8、以下哪一个命令的功能是设置屏幕分辨率?C. SetSc9、以下哪一个命令不能用于调试内容输出?D. Beep10、QUI输入框控件返回值的变量类型是?C. 字符串11、常数 VbOk 的值为?B. 112、以下命令无法正常获取句柄的是?B. Hwnd = Plugin.Window.Find("#32770", -1)14、当n=3.141592*-1,以下语句返回值是绝对值的是?A. Abs(n)16、以下哪一个不是官方自带插件?B. RemoteAnswer.dll(石像答题插件)17、关于后台坐标的描述哪一个是不正确的?C. 后台坐标在窗体内是不会变化的18、下列语句中无法达到无限循环效果的是?A. For i = True To True : Next19、IsNumeric(n),当n等于"VrBrothers"时返回什么?A. False20、arr=Split("1,2,3,4,5,6,7,8,9", ","),问arr(5)等于多少?C. "6"21、以下无法获取句柄的命令是?C. Active22、以下哪一个返回值是字符串?C. "anjian"&"vrbrothers"23、arr=array(0,1,2,3,4,5,6,7,8,9),问Clng(arr(9))等于多少?B. 924、以下不属于按键命令(无效命令)的是?C. OnThreadLoad25、ExitOS命令中,以下描述错误的是?D. 可执行待机。
(完整word版)按键精灵3级考试问答题答案
1、True的值是? —1A. 0B。
—2C. -1D。
12、返回值=Round(3。
141592,5),求返回值是什么?A. 3.1415B. 3。
141592C. 3。
14 错D。
3。
141593、False的值是? 0A。
0B. —1C. 1D. -25以下哪一个不是数学函数?A。
SgnB。
AbsC. CcurD。
Rnd7、下列哪一个函数可以取数组最大可用下标?A。
UboundB. ArrayC. LboundD。
Split9、132 Mod 13 的值为?A。
0B. 3C。
2D. 411、选出下列代码中无法实现循环效果的选项.A. For i = 9 To 0 : Delay 100 : NextB。
For 10 : Delay 100 : NextC。
For i = 0 To 19 Step 2 : Delay 100 : NextD. For i = 0 To 9 : Delay 100 : Next12、以下命令可以获取当前窗口所在屏幕位置精确坐标的是? A。
Text = Plugin。
Window。
GetClientRect(Hwnd) B. Text = Plugin。
Window。
GetWindowRect(Hwnd) C。
Text = Plugin.Window。
GetExePath(Hwnd)D。
Text = Plugin.windows。
isWindow(Hwnd)15、PrintScreen命令支持哪种格式截图?A. TIFB. pngC. gifD. jpg16、a = 10.05 Mod 2 ,那么a的值为?A。
0.05B。
5C。
0D. 5。
02517、Erase 语句的含义是?A。
将控制权传递给 Sub 过程或 Function 过程B。
声明用于代替文字值的常数C。
重新初始化固定大小数组的元素,并释放动态数组的存储空间 D. 声明变量并分配存储空间19、以下哪一个返回值是字符串?A。
按键精灵一级考试题目
一级1.WaitKey命令有几个参数?正确答案:02、颜色值为"FFFFFF"是什么颜色?正确答案:白色3、鼠标左键弹起的命令是?正确答案:LeftUp4、按键码53是下列哪一个按键?正确答案:55、Delay命令有几个参数?正确答案:16、延迟1天,以下哪一句代码是正确的?正确答案:Delay 1000*60*60*24*17、下列哪一个命令会暂停脚本?正确答案:WaitClick8、EndScript命令的意义是?正确答案:脚本停止运行9、判断条件应该使用下列哪个语句?正确答案:If语句11、以下哪一个不属于按键精灵的"全部命令"?正确答案:远程嗅探命令12、鼠标所在位置为(100,50),经过命令 MoveToS 50+50,100后鼠标所在位置为?正确答案:100,10013、不能正确调用KeyPress命令的写法是?正确答案:KeyPress "FB",115、组合键"CTRL+C"的正确按键顺序是?正确答案:按下"CTRL",点击"C",弹起"CTRL"16、"F10"的按键码是?正确答案:12117、以下哪一个命令能够延时1个小时?正确答案:delay 1000*60*6018、下列RGB颜色值,书写正确的是?正确答案:"DD"20、区域找图的命令是?正确答案:FindPic21、循环可以使用下列哪个语句?正确答案:For语句22、附件中哪一种文件可以不经过释放直接使用? 正确答案:BMP23、以下哪一个写法不能点击"shift"键?正确答案:KeyPress 60, 124、取指定点颜色的命令是?正确答案:GetPixelColor25、锁定鼠标位置是下列哪一个命令?正确答案:LockMouse26、延迟3分钟,以下哪一句代码是正确的?正确答案:Delay 1000*60*327、鼠标右键弹起的命令是?正确答案:RightUp28、脚本停止运行命令是哪一个?正确答案:EndScript30、解除鼠标锁定是下列哪一个命令?正确答案:UnlockMouse31、键盘按下的命令是?正确答案:KeyDown32、以下哪一个不属于按键精灵基本命令?正确答案:压缩命令33、下列哪一个是鼠标命令?正确答案:LeftClick34、鼠标所在位置为(50,50),经过命令MoveTo 50,100 后鼠标所在位置为:正确答案:50,10035、以下哪一个是自动补血的思路?正确答案:检测血条上某一点,如果此点不是血条的颜色则执行加血操作36、下面哪一个是循环命令?正确答案:Do...Loop37、SetSimMode命令有几个参数?正确答案:138、哪一种写法不能循环5次?正确答案:For i=1 To 9 :Next39、下列哪一个不是键盘命令?正确答案:KeyClick40、按键码76是下列哪一个按键?正确答案:L41、空格键的按键码是?正确答案:3242、延时的命令是?正确答案:Delay43、下列哪一个不是鼠标命令?正确答案:LeftThreeClick44、下列属于键盘命令的是?正确答案:KeyUp45、如何退出Do循环的命令?正确答案:Exit Do46、得到一个按键的按键码,以下哪一个方法是完全正确的? 正确答案:在按键精灵编辑界面的基本命令的键盘命令部分查询47、EndScript命令的意义是?正确答案:脚本停止运行48、延迟3秒,以下哪一句代码是正确的?正确答案:Delay 300049、下列哪一个命令会暂停脚本?正确答案:WaitClick50、按键精灵找图命令需要的图片格式是下列哪一个? 正确答案:*.BMP51、以下哪一个不属于按键精灵基本命令?正确答案:压缩命令52、取指定点颜色的命令是?正确答案:GetPixelColor53、FindPic命令有几个参数?正确答案:854、区域找图的命令是?正确答案:FindPic56、区域找色的命令是?正确答案:FindColor57、下列哪一个不是循环命令?正确答案:Select Case58、鼠标相对移动的命令是? 正确答案:MoveR59、下面哪一个是循环命令?正确答案:Do...Loop60、鼠标右键按下的命令是?正确答案:RightDown61、鼠标所在位置为(0,50),经过命令 MoveTo 50+50,100 后鼠标所在位置为?正确答案:100,10062、下列哪一段代码不能输出"L"键?正确答案:Keyup "L", 163、下列RGB颜色值,书写错误的是?正确答案:"FFFFFFFF"64、FindColor命令有几个参数?正确答案:765、按键精灵语言大小写的描述哪一个是正确的?正确答案:按键精灵不区分大小写66、鼠标所在位置为(50,50),经过命令 MoveR 50,100 后鼠标所在位置为:正确答案:100,15067、延时命令 Delay 1000,以下的解释哪一个是正确的? 正确答案:延迟1秒68、不能实现键盘按下"A"键的命令是?正确答案:KeyPressW "A",169、以下哪一个命令会暂停脚本?正确答案:WaitKey70、LeftDown命令有几个参数?正确答案:171、延迟2小时,以下哪一句代码是正确的?正确答案:Delay 1000*60*60*272、颜色值为"000000"是什么颜色?正确答案:黑色73、下列属于鼠标命令的是?正确答案:RightClick74、下列哪一种写法是错误的?正确答案:If Goto a Then :End If75、下列哪一个是循环命令? 正确答案:While...Wend76、文本内容和数字连接在一起(连接符)应使用下列哪一个符号? 正确答案:&77、以下哪一种方式不能无限循环? 正确答案:在脚本开头加入"For 10000",脚本尾部加入"Next"78、下列哪一个不是逻辑运算符?正确答案:Const79、以下哪一个不是按键精灵可以使用的界面?正确答案:检测血条上某一点,如果此点不是血条的颜色则执行加血操作80、以下哪一个不是按键精灵可以使用的界面?正确答案:GUI界面81、KeyPress命令有几个参数?正确答案:282、键盘弹起的命令是?正确答案:KeyUp83、以下哪一段命令能正确执行"当a=1时点击A键,否则点击B键"?正确答案:If a=1 Then:KeyPress "A",1:Else:KeyPress "B",1:EndIf84、如何退出For循环的命令?正确答案:Exit For85、代码KeyPress "A",1 调试后提示出错,错误的原因是? 正确答案:逗号使用了全角符号无法识别导致错误86、以下哪一个写法不能点击"shift"键?正确答案:KeyPress87、默认情况下某些特定窗口模拟按键可能失效,以下哪种方法可以解决?正确答案:在脚本开头增加代码:SetSimMode 288、以下哪一个写法不能点击"shift"键?正确答案:KeyPress 60, 189、如何退出For循环的命令?正确答案:Exit For90、以下哪一段命令能正确执行"如果(70,416)的颜色等于"FFFFFF"则鼠标移动到点(100,200)"?正确答案:IfColor 7If91、鼠标右键弹起的命令是?正确答案:RightUp92、区域找色的命令是?正确答案:FindColor93、不能正确调用KeyPress命令的写法是?正确答案:KeyPress "FB",194、下列哪一种写法是错误的?正确答案:If Goto a Then :End If95、延迟3分钟,以下哪一句代码是正确的?正确答案:Delay 1000*60*396、不能实现键盘按下"A"键的命令是?正确答案:KeyPressW "A",197、鼠标所在位置为(50,50),经过命令 MoveR 50,100 后鼠标所在位置为:正确答案:100,15098、默认情况下某些特定窗口模拟按键可能失效,以下哪种方法可能可以解决?正确答案:在脚本开头增加代码:SetSimMode 299、GetPixelColor命令有几个参数?正确答案:2100、FindColorEx命令有几个参数?正确答案:9101、下面哪一个命令会暂停脚本?正确答案:MsgBox102、不属于按键精灵基本命令是?正确答案:启动命令103、哪一种不能正确调用KeyPress命令?正确答案:KeyPress "FA",1104、哪一种写法不能循环5次?正确答案:For i=1 To 9 :Next105、MoveTo命令有几个参数?正确答案:2106、下列哪一个不是循环命令?正确答案:Select Case107、以下哪一个是自动打怪的思路?正确答案:检测怪物血条上某一点,如果此点是血条的颜色则执行打怪操作108、以下哪一个命令不会暂停脚本?正确答案:for...next二级1、WaitKey命令有几个参数?正确答案:02、颜色值为"FFFFFF"是什么颜色?正确答案:白色3、鼠标左键弹起的命令是?正确答案:LeftUp4、按键码53是下列哪一个按键?正确答案:55、Delay命令有几个参数?正确答案:16、延迟1天,以下哪一句代码是正确的?正确答案:Delay 1000*60*60*24*17、下列哪一个命令会暂停脚本?正确答案:WaitClick8、EndScript命令的意义是?正确答案:脚本停止运行9、判断条件应该使用下列哪个语句?正确答案:If语句10、按键精灵找图命令需要的图片格式是下列哪一个?正确答案:*.BMP11、以下哪一个不属于按键精灵的"全部命令"?正确答案:远程嗅探命令12、鼠标所在位置为(100,50),经过命令 MoveToS 50+50,100 后鼠标所在位置为?正确答案:100,10013、不能正确调用KeyPress命令的写法是?正确答案:KeyPress14、鼠标右键单击的命令是?正确答案:RightClick15、组合键"CTRL+C"的正确按键顺序是?正确答案:按下"CTRL",点击"C",弹起"CTRL"16、"F10"的按键码是?正确答案:12117、以下哪一个命令能够延时1个小时?正确答案:delay 1000*60*6018、下列RGB颜色值,书写正确的是?正确答案:"DD"20、区域找图的命令是?正确答案:FindPic21、循环可以使用下列哪个语句?正确答案:For语句22、附件中哪一种文件可以不经过释放直接使用?正确答案:BMP23、以下哪一个写法不能点击"shift"键?正确答案:KeyPress 60,24、取指定点颜色的命令是?正确答案:GetPixelColor25、锁定鼠标位置是下列哪一个命令?正确答案:LockMouse26、延迟3分钟,以下哪一句代码是正确的?正确答案:Delay 1000*60*327、鼠标右键弹起的命令是?正确答案:RightUp28、脚本停止运行命令是哪一个?正确答案:EndScript29、鼠标左键双击的命令是?正确答案:LeftDoubleClick30、解除鼠标锁定是下列哪一个命令?正确答案:UnlockMouse31、键盘按下的命令是?正确答案:KeyDown32、以下哪一个不属于按键精灵基本命令?正确答案:压缩命令33、下列哪一个是鼠标命令?正确答案:LeftClick34、鼠标所在位置为(50,50),经过命令MoveTo 50,100 后鼠标所在位置为:正确答案:50,10035、以下哪一个是自动补血的思路?正确答案:检测血条上某一点,如果此点不是血条的颜色则执行加血操作36、下面哪一个是循环命令?正确答案:Do...Loop37、SetSimMode命令有几个参数?正确答案:138、哪一种写法不能循环5次?正确答案:For i=1 To 9 :Next39、下列哪一个不是键盘命令?正确答案:KeyClick40、按键码76是下列哪一个按键?正确答案:L41、空格键的按键码是?正确答案:3242、延时的命令是?正确答案:Delay43、下列哪一个不是鼠标命令?正确答案:LeftThreeClick44、下列属于键盘命令的是?正确答案:KeyUp45、如何退出Do循环的命令?正确答案:Exit Do46、得到一个按键的按键码,以下哪一个方法是完全正确的?正确答案:在按键精灵编辑界面的基本命令的键盘命令部分查询47、EndScript命令的意义是?正确答案:脚本停止运行48、延迟3秒,以下哪一句代码是正确的?正确答案:Delay 300049、下列哪一个命令会暂停脚本?正确答案:WaitClick50、按键精灵找图命令需要的图片格式是下列哪一个?正确答案:*.BMP51、以下哪一个不属于按键精灵基本命令?正确答案:压缩命令52、取指定点颜色的命令是?正确答案:GetPixelColor53、FindPic命令有几个参数?正确答案:854、区域找图的命令是?正确答案:FindPic56、区域找色的命令是?正确答案:FindColor57、下列哪一个不是循环命令?正确答案:Select Case58鼠标相对移动的命令是?正确答案:MoveR59、下面哪一个是循环命令?正确答案:Do...Loop60、鼠标右键按下的命令是?正确答案:RightDown61、鼠标所在位置为(0,50),经过命令 MoveTo 50+50,100 后鼠标所在位置为?正确答案:100,10062、下列哪一段代码不能输出"L"键?正确答案:Keyup, 63、下列RGB颜色值,书写错误的是?正确答案:"FFFFFFFF" 64、FindColor命令有几个参数?正确答案:765、按键精灵语言大小写的描述哪一个是正确的?正确答案:按键精灵不区分大小写66、鼠标所在位置为(50,50),经过命令 MoveR 50,100 后鼠标所在位置为:正确答案:100,15067、延时命令 Delay 1000,以下的解释哪一个是正确的正确答案:延迟1秒68、不能实现键盘按下"A"键的命令是?正确答案:KeyPressW "A",169、以下哪一个命令会暂停脚本?正确答案:WaitKey70、LeftDown命令有几个参数?正确答案:171、延迟2小时,以下哪一句代码是正确的?正确答案:Delay 1000*60*60*272、颜色值为"000000"是什么颜色?正确答案:黑色73、下列属于鼠标命令的是?正确答案:RightClick74、下列哪一种写法是错误的?正确答案:If Goto a Then :End If75、下列哪一个是循环命令?正确答案:While...Wend76、文本容和数字连接在一起(连接符)应使用下列哪一个符号?正确答案:&77、以下哪一种方式不能无限循环?正确答案:在脚本开头加入"For 10000",脚本尾部加入"Next"78、下列哪一个不是逻辑运算符?正确答案:Const79、以下哪一个不是按键精灵可以使用的界面?正确答案:检测血条上某一点,如果此点不是血条的颜色则执行加血操作80、以下哪一个不是按键精灵可以使用的界面?正确答案:GUI界面81、KeyPress命令有几个参数?正确答案:282、键盘弹起的命令是?正确答案:KeyUp83、以下哪一段命令能正确执行"当a=1时点击A键,否则点击B键"?正确答案:If a=1 Then:KeyPress "A",1:Else:KeyPress "B",1:End If84、如何退出For循环的命令?正确答案:Exit For85、代码KeyPress "A",1 调试后提示出错,错误的原因是? 正确答案:逗号使用了全角符号无法识别导致错误86、以下哪一个写法不能点击"shift"键?正确答案:KeyPress 60, 187、默认情况下某些特定窗口模拟按键可能失效,以下哪种方法可能可以解决? 正确答案:在脚本开头增加代码:SetSimMode 288、以下哪一个写法不能点击"shift"键?正确答案:KeyPress 60,89、如何退出For循环的命令?正确答案:Exit For90、以下哪一段命令能正确执行"如果(70,416)的颜色等于"FFFFFF"则鼠标移动到点(100,200)"?30.键弹起的命令是?正确答案:RightUp31、区域找色的命令是?正确答案:FindColor32、不能正确调用KeyPress命令的写法是?正确答案:KeyPress34、下列哪一种写法是错误的?正确答案:If Goto a Then :End If37、延迟3分钟,以下哪一句代码是正确的?正确答案:Delay 1000*60*338、代码KeyPress "A",1 调试后提示出错,错误的原因是? 正确答案:逗号使用了全角符号无法识别导致错误39、附件中哪一种文件可以不经过释放直接使用?正确答案:BMP41、鼠标中键单击的命令是?正确答案:MiddleClick42、哪一种不能正确调用KeyPress命令?正确答案:KeyPress43、不属于按键精灵基本命令是?正确答案:启动命令44、键盘按下的命令是?正确答案:KeyDown49、按键精灵语言大小写的描述哪一个是正确的?正确答案:按键精灵不区分大小写50、SetSimMode 1 的实际意义是?正确答案:使用硬件模拟51、以下哪一种方式不能无限循环?正确答案:在脚本开头加入"For 10000",脚本尾部加入"Next"10、代码KeyPress "A",1 调试后提示出错,错误的原因是?正确答案:逗号使用了全角符号无法识别导致错误11、不能正确调用KeyPress命令的写法是?正确答案:KeyPress13、下列哪一个不是鼠标命令?正确答案:LeftThreeClick16、键盘弹起的命令是?正确答案:KeyUp17、以下哪一个是循环命令?正确答案:for...next18、不能实现键盘按下"A"键的命令是?正确答案:KeyPressW "A",120、鼠标所在位置为(50,50),经过命令 MoveR 50,100 后鼠标所在位置为:正确答案:100,15021、默认情况下某些特定窗口模拟按键可能失效,以下哪种方法可能可以解决?正确答案:在脚本开头增加代码:SetSimMode24、GetPixelColor命令有几个参数?正确答案:26、FindColorEx命令有几个参数?正确答案:27、下面哪一个命令会暂停脚本?正确答案:MsgBox31、不属于按键精灵基本命令是?正确答案:启动命令43、哪一种不能正确调用KeyPress命令?正确答案:KeyPress "FA",145、哪一种写法不能循环5次?正确答案:For i=1 To 9 :Next 请提供至少两种判断程序卡死(无响应)的思路,请写出关键代码.请写出代码PrivateDeclare Function IsHungAppWindow Lib "user32.dll" ( ByVal hWnd As Long) As LongSub 子程序()Hwnd = Plugin.Window.MousePoint()If IsHungAppWindow(Hwnd)=0 ThenMsgBox "窗口正常"End IfEnd SubPrivate Declare Function IsHungAppWindow Lib "user32.dll" ( ByVal hWnd AsLong) As LongHwnd = Plugin.Window.MousePoint()If IsHungAppWindow(Hwnd)=0 ThenMsgBox "窗口正常"End If。
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
End if
Goto 打印1
End If
If g=2 Then
g="+"
If x-y+z>a Then
Goto 开始
Delay 50
If c = b Then
MessageBox "本次答题结束,继续努力哦..."
EndScript
End if
Goto 开始
Rem 打印4
L=L+1
C = C + 1
Rem 重新4
ge = cstr(c)
ge1="第"+ge+"题"
jia1 = cstr(x)
EndScript
End if
Goto 开始
Delay 50
If c = b Then
MessageBox "本次答题结束,继续努力哦..."
EndScript
End if
Goto 开始
Rem 打印3
L=L+1
C = C + 1
Rem 重新3
ge = cstr(c)
jia2 = cstr(y)
jia3 = cstr(z)
shi=jia1+m+jia2+g+jia3+"="
t = InputBox(shi, ge1, "")
t = cint(t)
If x + y +z= t Then
dui = dui + 1
Else MessageBox "错误,请重新回答..."
Rem 打印1
L=L+1
C = C + 1
Rem 重新1
ge = cstr(c)
ge1="第"+ge+"题"
jia1 = cstr(x)
jia2 = cstr(y)
shi=jia1+m+jia2+"="
t = InputBox(shi, ge1, "")
t = cint(t)
EndScript
End if
Goto 开始
End Sub
End if
Goto 开始
Rem 打印2
L=L+1
C = C + 1
Rem 重新2
ge = cstr(c)
ge1="第"+ge+"题"
jia1 = cstr(x)
jia2 = cstr(y)
shi=jia1+m+jia2+"="
t = ox(shi, ge1, "")
End If
Call 子程序2()
Sub 子程序1()
Rem 开始
Randomize
x=int(Rnd * (a-1+1)) + 1
y=int(Rnd * (a-1+1)) + 1
f=int(Rnd * (1-0+1)) + 1
If f=1 Then
m="-"
dim a,b
a=InputBox("输入加减法上限")
b = InputBox("输入出题个数")
q=InputBox("是2个数还是3个数相加减")
a=cint(a)
b = cint(b)
q = cint(q)
Delay 500
If q = 2 Then
Call 子程序1()
If x-y<0 Then
Goto 开始
End if
Goto 打印1
End If
If f=2 Then
m="+"
If x+y>a Then
Goto 开始
End if
Goto 打印2
End if
If x - y -z= t Then
dui = dui + 1
Else MessageBox "错误,请重新回答..."
Goto 重新1
End If
Delay 50
If c = b Then
MessageBox "本次答题结束,继续努力哦..."
EndScript
End if
Goto 打印2
End if
End If
If f=2 Then
m="+"
End if
If x+y>a Then
Goto 开始
End if
If g=1 Then
g="-"
If x+y-z<0 Then
z=int(Rnd * (a-1+1)) + 1
g=int(Rnd * (1-0+1)) + 1
If f=1 Then
If x-y<0 Then
Goto 开始
End if
m="-"
If g=1 Then
g="-"
If x-y-z<0 Then
t = cint(t)
If x + y = t Then
dui = dui + 1
Else MessageBox "错误,请重新回答..."
Goto 重新2
End If
Delay 50
If c = b Then
MessageBox "本次答题结束,继续努力哦..."
ge1="第"+ge+"题"
jia1 = cstr(x)
jia2 = cstr(y)
jia3 = cstr(z)
shi=jia1+m+jia2+g+jia3+"="
t = InputBox(shi, ge1, "")
t = cint(t)
If x + y -z= t Then
dui = dui + 1
C = C + 1
Rem 重新1
ge = cstr(c)
ge1="第"+ge+"题"
jia1 = cstr(x)
jia2 = cstr(y)
jia3 = cstr(z)
shi=jia1+m+jia2+g+jia3+"="
t = InputBox(shi, ge1, "")
t = cint(t)
EndScript
End if
Goto 开始
End Sub
Sub 子程序2()
Rem 开始
Randomize
x=int(Rnd * (a-1+1)) + 1
y=int(Rnd * (a-1+1)) + 1
f=int(Rnd * (1-0+1)) + 1
Goto 重新4
End If
Delay 50
If c = b Then
MessageBox "本次答题结束,继续努力哦..."
EndScript
End if
Goto 开始
Delay 50
If c = b Then
MessageBox "本次答题结束,继续努力哦..."
End if
Goto 开始
Rem 打印2
L=L+1
C = C + 1
Rem 重新2
ge = cstr(c)
ge1="第"+ge+"题"
jia1 = cstr(x)
jia2 = cstr(y)
jia3 = cstr(z)
shi=jia1+m+jia2+g+jia3+"="
t = InputBox(shi, ge1, "")
t = cint(t)
If x - y +z= t Then
dui = dui + 1
Else MessageBox "错误,请重新回答..."
Goto 重新2
End If
Delay 50
If c = b Then
MessageBox "本次答题结束,继续努力哦..."
If x - y = t Then
dui = dui + 1
Else MessageBox "错误,请重新回答..."
Goto 重新1
End If
Delay 50
If c = b Then