vb做一个幼儿园的算数游戏
答案:1 悬赏:70 手机版
解决时间 2021-10-18 17:31
- 提问者网友：寂寞梧桐
- 2021-10-18 08:01
vb做一个幼儿园的算数游戏
最佳答案
- 五星知识达人网友：酒醒三更
- 2021-10-18 09:00
一个文本框（text1）写答案两个个标签label1写题目，label2显示是否正确两个个按钮一个判断对错（p）一个出下一题（c）下面是代码：Public z As Integer '通用Private Sub c_Click() Dim x, y, a As Integer Randomize a = Int(Rnd() * 2) x = Int(Rnd() * 51) y = Int(Rnd() * 51) If a = 0 Then z = x + y Label1.Caption = Str(x) & "+" & Str(y) & "等于几" Else If x > y Then z = x - y Label1.Caption = Str(x) & "-" & Str(y) & "等于几" Else z = y - x Label1.Caption = Str(y) & "-" & Str(x) & "等于几" End If End IfEnd SubPrivate Sub p_Click() Dim d As Integer d = Val(Text1.Text) If d = z Then Label2.Caption = "正确" Else Label2.Caption = "错误"End Sub
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯