在代码页的最前面加入以下的2行：
Option Base 1
Dim x As Integer, y As Integer, z As Integer
另外，所有的以下部分要修改：
Text1.Text = ("电脑胜利 ") & x&(" 盘")
Text2.Text = ("你胜利 ") & y&(" 盘")
改为：
Text1.Text = "电脑胜利 " & x & " 盘"
Text2.Text = "你胜利 " & y & " 盘"
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024