私人?Sub?Command1_Click()
暗淡?我?作為?整數
使不規則化
為了什麽?我?=?0?去哪?九
n(i)?=?Int(Rnd?*?90)?+?10
如果?我?=?0?然後
麥克斯。=?名詞(壹)
敏?=?名詞(壹)
其他
如果?麥克斯。& lt?n(i)?然後呢?麥克斯。=?名詞(壹)
如果?敏?& gt?n(i)?然後呢?敏?=?名詞(壹)
結束?如果
sum?=?sum?+?名詞(壹)
然後
Text1。文字?=?加入(n,?",")
結束?潛水艇
私人?Sub?Command2_Click()
MsgBox?“最低多少”?& amp?部
結束?潛水艇
私人?Sub?Command3_Click()
MsgBox?“最大值是多少”?& amp?最大
結束?潛水艇
私人?Sub?Command4_Click()
MsgBox?“平均值是多少”?& amp?sum?/?10
結束?潛水艇