vb十以内的加法练习程序,随机产生两个10以内的数相加,输入答案...

提问网友发布时间：2025-01-18 04:22

声明：本网页内容为用户发布，旨在传播知识，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。
E-MAIL:1656858193@qq.com

共4个回答

热心网友回答时间：2025-01-18 09:45

我要改一下
绝对可以

Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a = Int((10 * Rnd) + 1)
b = Int((10 * Rnd) + 1)
MsgBox a, , "第一个数为"
MsgBox b, , "第二个数为"
c = InputBox("请输入你的答案")
If c = a + b Then
MsgBox "恭喜你答对了！"
End If
If c <> a + b Then
MsgBox "很遗憾，你回答错了！"
End If
End Sub

热心网友回答时间：2025-01-18 09:43

这题能做，需要 hi 我

热心网友回答时间：2025-01-18 09:45

Module module3

Sub Main()
Dim num1, num2, sum As Integer
Dim answer As Integer '用户输入的答案
Dim rand As New Random()

num1 = rand.Next() Mod 10 '得到随机数，控制在[0,10]之间
num2 = rand.Next() Mod 10
sum = num1 + num2

Console.WriteLine("请输入您的答案：")
answer = Integer.Parse(Console.ReadLine()) '得到用户输入的答案

If (answer = sum) Then
Console.WriteLine("恭喜您，猜对了!")
Console.WriteLine("我们就是 " & num1 & " 和 " & num2)
Else
Console.WriteLine("很遗憾，猜错了,继续努力... ...")
Console.WriteLine("其实我们是 " & num1 & " 和 " & num2)
End If
End Sub

End Module

热心网友回答时间：2025-01-18 09:46

十以内的加法练习程序，随机产生两个10以内的数相加，输入答案判断对错。再接下来就做一个有关字符串的程序（包括文件保存、读取）。再接下来就做一个时钟的程序（包括显示、定时、秒表等）。

本文如未解决您的问题请添加抖音号：51dongshi（抖音搜索懂视），直接咨询即可。

已解决

等待解决

首页

互助专区

登录

注册

vb十以内的加法练习程序,随机产生两个10以内的数相加,输入答案...