一道简单的题目，求助！

xia123456789 发布于 2009-09-19 23:24， 1003 次点击

设计一个由计算机来当小学低年级学生算术老师的VB应用程序，要求给出随机的一系列的两个1~10数的四则运算的算术题，学生输入该题的答案，计算机根据学生的答案判断正确与否，（如7+2=9 √）并给出共答几题，正确几题错误几题正确率，单击结束命令按钮，退出应用程序。

[ 本帖最后由 xia123456789 于 2009-9-19 23:25 编辑 ]

3 回复

fairy42009-09-24 11:07

既然簡單，自己隨便弄下就是，何來求助呢？
唉，現在的學生連自己的作業題都不願意做了

subMain2009-09-26 17:19

要先学会怎么取得1到10的随机数，其它的就好说了。

kangtroo2009-10-04 18:50

Dim text1, text2 As Integer
        text1 = Int((10 - 1 + 1) * Rnd() + 1)
        text2 = Int((10 - 1 + 1) * Rnd() + 1)     '随机得出两个十以内的数
        Dim ans1, ans2, ans3, ans4 As Integer

        ans1 = text1 + text2
        ans2 = text1 - text2
        ans3 = text1 * text2
        ans4 = text1 / text2                    '后面再写个判断就行了..
    不过这样写的话会出现负数,跟小数点.小学生能做得了??