產生100個亂數介於1-6之間 '計算出1-6出現次數,並且次數全部加總要100次. Private Sub Form_Activate() Randomize Dim count(6) As Integer '記錄筆數 Dim Num As ...
確定! 回上一頁