excel表格中怎么制作骰子游戏excel表格中怎么制作骰子游戏
附件是最简单的
用VBA做
代码
Sub 掷骰子()Dim xx = Int((6 * Rnd) + 1)msg = MsgBox(\"骰子的点数为\" & x, vbOKOnly, \"掷骰结果\")End Sub
附件是最简单的
用VBA做
代码
Sub 掷骰子()Dim xx = Int((6 * Rnd) + 1)msg = MsgBox(\"骰子的点数为\" & x, vbOKOnly, \"掷骰结果\")End Sub
多重随机标签