UC知道vb小程序设计
来源：百度知道 编辑：UC知道 时间：2024/06/23 09:11:17
一个人机小游戏。
猜拳。
有三个选项，石头，剪子，布
选择后 电脑也随机选择一个比较胜负
可以把人选择的设为值 a
电脑选择的设为 b
代码如何编写？
猜拳。
有三个选项，石头，剪子，布
选择后 电脑也随机选择一个比较胜负
可以把人选择的设为值 a
电脑选择的设为 b
代码如何编写？
先自己画控件，参照图片里面的
不能有错
注意左边框架里面还有一个标签
不要忘记!!
Private Sub Command1_Click()
Randomize
Dim a%, b%, c%, cr%
cr = Int(3 * Rnd + 1)
If cr = 1 Then
Label1.Caption = "石头"
ElseIf cr = 2 Then
Label1.Caption = "剪刀"
ElseIf cr = 3 Then
Label1.Caption = "布"
End If
If cr = 1 And Option1.Value = True Then MsgBox ("平")
If cr = 1 And Option2.Value = True Then MsgBox ("You Lost")
If cr = 1 And Option3.Value = True Then MsgBox ("You Win!")
If cr = 2 And Option1.Value = True Then MsgBo