【VB开源代码栏目提醒】:网学会员鉴于大家对VB开源代码十分关注,论文会员在此为大家搜集整理了“四则运算游戏”一文,供大家参考学习
内容提要:【编号:011】使用者在进入界面后可根据自己的情况选择不同的年级,在选择适合不同的阶段的体形,设置做题时间以后,便可开始做题游戏。功能需求
1)为学前儿童、小学生专门设计的用来进行加减乘除以及混合计算练习的游戏软件。
2)题目难度类型,计算时间可设定。
3)题目完成后可自动判断对错。
四则混合运算小游戏操作流程
通过对相关资料的查询,我们了解了小学生各年级的数学学习内容,在经过筛选,我们划定了适合做口算运算的一到五年级的数学学习中适合口算的部分内容作为游戏内容,(学前一般以认数为主,六年级的内容已经比较复杂,口算并没有太大的意义,所以我们并没有对这两个年纪的内容进行编写,学前儿童如果对数学掌握的比较好的话,便可直接进入一年级的训练)。
使用者在进入界面后可根据自己的情况选择不同的年级,在选择适合不同的阶段的体形,设置做题时间以后,便可开始做题游戏,在做完题目以后或这设定的时间到达以后点击判题便可实现题目的判断与结果统计。如做完一套题目,也可在本级别继续点击换题做同级别的不同题目。
部分代码:
其中在欢迎界面中主要的算法是:
Private Sub Form_Load()
Dim strPicturePath As String
frmLoadPicture.Show 0 '', frmMain ''显示登录窗口
frmPictureBox.Stretch = True
frmLoadPicture.Refresh
'' 等待十秒?
Dim dblEndTime As Double
dblEndTime = Timer + 4#
Do While dblEndTime > Timer
''不做任何事情,仅仅允许其它应用程序处理它们的事件
DoEvents
Loop
Unload frmLoadPicture
frmMain.Show
End Sub