解释一下这vb个代码。。。。看不懂。。。

Question

做三个图，分别命名为1。2。3 即石头为1 剪刀为2 布为3
窗体上放三个按钮，分别为YOU(1)、YOU(2)、You(3) 顺序与上同
private sub YOU_click(index as long)
Dim A1 As Long, A2 As Long 'A1 为你出的，A2为电脑出的
A1 = index
Randomize
A2 = Fix(Rnd * 3 + 1) '由电脑随机得到数字1或2或3
image1.picture=app.path & A2 & ".jpg" 这是显示电脑出的什么
Select Case A1
Case 1
Select Case A2
Case 1
MsgBox "和局" ‘这里给出这一局的结果，我用msgbox 显示，你也可以用其他方法，下面的一样。并且在这里还可以加上输赢统计
Case 2
MsgBox "你赢了"
Case 3
MsgBox "你输了"
End Select
Case 2
Select Case A2
Case 1
MsgBox "你输了"
Case 2
MsgBox "和局"
Case 3
MsgBox "你赢了"
End Select
Case 3
Select Case A2
Case 1
MsgBox "你赢了"
Case 2
MsgBox "你输了"
Case 3
MsgBox "和局"
End Select
End Select

YOU是什么东东？

Answer 1

YOU(1) YOU(2) YOU(3) 是一个数组控件，也就是分别表示三个按钮，
从程序看YOU(1)=1 表示石头
YOU(2)=2 表示剪刀
YOU(3)=3 表示布

如当你按下YOU(1)这个控制，表示你出的是石头，也就是private sub YOU_click(index as long)
INDEX=1

A2 = Fix(Rnd * 3 + 1) '由电脑随机得到数字1或2或3
A2由电脑随时得到的。
和你出的A1相比较

Answer 2

按钮名字