Private Sub Command1_Click()Select Case a Case 1 Label1.Caption = "你一般啦!只是打和!" Case 2 Label1.Caption = "對不起!你輸啦" Case 3 Label1.Caption = "Oh!你贏啦!啦!" End Select End SubPrivate Sub Command2_Click()Select Case a Case 1 Label1.Caption = "Oh!你贏啦!" Case 2 Label1.Caption = "你一般啦!只是打和!" Case 3 Label1.Caption = "對不起!你輸啦" End SelectEnd SubPrivate Sub Command3_Click()Select Case a Case 1 Label1.Caption = "對不起!你輸啦" Case 2 Label1.Caption = "Oh!你贏啦!" Case 3 Label1.Caption = "你一般啦!只是打和!" End SelectEnd SubPrivate Sub Command4_Click()a = Fix(Rnd * 3) + 1End Sub我想用[Command4]按一下隨機生成一個數，生成那個數可以在[Command3][Command2][Command1]那里用。。。請問如何啊？我這個是[包'剪'錘]的游戲。。

熱心網友

小意思,聲明一個模塊級變量就行了在最前面添加一行dim a as long萬事ok

熱心網友

你要生成的這個1--3的數是不是就是代表[Command3][Command2][Command1]啊？