【急救】谁能帮我解释一下这段VB代码啊？万分感谢

Private Sub Form_Activate()
Option1.Caption = "石头" '定义控件的标题，也就是石头、布、...
Option2.Caption = "剪刀"
Option3.Caption = "布"
Option1.Value = False '让option1、option2、option3、的初始状态都是假，也就是单选按钮没被选中
Option2.Value = False
Option3.Value = False
End Sub

Private Sub Option1_Click() '编辑option1的单击事件
Randomize '让长生随机数的值随机
Select Case Int(3 * Rnd) '产生随机数
Case 0: MsgBox "对方也出石头！继续！" '这些就不用说了么，只是个判断而已，你永远都只能出石头，（因为你之编辑option1这个事件，懂了吧）
Case 1: MsgBox "哈哈！你赢了！对方出的是剪刀！奖励你一个苹果！"
Case 2: MsgBox "你输了！对方出的是布哦！不好意思，苹果给对方了哈！"
End Select '语句结束
Option1.Value = False '让option1的值又为假，就是没被选中
End Sub
希望能帮助你，不懂得你问我

下面就是 制作你的窗体硬件：
Private Sub Form_Activate()
Option1.Caption = "石头"
Option2.Caption = "剪刀"
Option3.Caption = "布"
Option1.Value = False
Option2.Value = False
Option3.Value = False
End Sub

下面是针对你第一个按钮的操作，与随机数对比， 判断是否都出的是石头。
Private Sub Option1_Click()
Randomize
Select Case Int(3 * Rnd)
Case 0: MsgBox "对方也出石头！继续！"
Case 1: MsgBox "哈哈！你赢了！对方出的是剪刀！奖励你一个苹果！"
Case 2: MsgBox "你输了！对方出的是布哦！不好意思，苹果给对方了哈！"
End Select
Option1.Value = False
End Sub