vb写,谢谢
展开全部
Private Sub Command1_Click()
Randomize
Dim I As Long, J As Long
Static K As Long
I = Val(Text1.Text)
J = Int(Rnd * 100) + 1
If I > J Then
Label1.Caption = "你输入的数大了!"
ElseIf I = J Then
Label1.Caption = "太厉害了,你输入的数正好!"
Else
Label1.Caption = "你输入的数小了!"
End If
K = K + 1
Label2.Caption = "你一共猜了:" & K & "次。"
End Sub
--
2022-12-05 广告
2022-12-05 广告
图形化编程简单理解为用积木块形式编程,scratch和python也是其中的一种,属于入门级编程,以其简单生动的画面获得无数学生的喜爱,深圳市创客火科技有限公司是一家做教育无人机的公司,旗下有编程无人机,积木无人机及室内外编队,每款飞机含有...
点击进入详情页
本回答由--提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询