關於所有陣列的總數相加在找出最小值的問題

Question

這是我目前的問題：
有10個陣列設為W(i)，而每個陣列裡面又有24個亂數決定的數字設為l(j)，範圍在1~100之間
w(i)=[l(j)]
現在問題來了，我想要算出所有W陣列裡所有數字加起來的總和並找出它的最小值，之前有寫過類似的問題不過那時候是只有幾個陣列而且裡面的數字也都知道，可是像這種陣列比較大而且陣列裡面的數字又是亂數決定的話應該要如何寫，麻煩會的高手教教我並在程式碼旁邊附上註解，謝謝！

亂數可以重複

Answer 1

'改好了XDPrivate Sub Command1_Click()    Dim W(1 To 10), L(1 To 24) As String, I As Integer, J As Integer    Dim Min As Integer, T As Integer, f As Integer        Cls    f = 1 '暫設最小值指標為1    For I = 1 To 10        Randomize        T = 0 '總和歸零        For J = 1 To 24            '亂數決定24個數字給L(J)            L(J) = Int(Rnd * 100 + 1)            T = T + L(J)        Next        '把L陣列代入W(I)        W(I) = L        If I = 1 Then '先假設W(I)陣列內1~10中的第1個值為最小值(Min)           Min = T        Else           '從2~10跟Min比,若其中有比Min小就將其值代入Min,並記錄指標           If Min > T Then Min = T: f = I        End If        '用Join函數以+號分隔輸出W(I)及總和        Print "W("; I; ")=["; Join(W(I), "+"); "] = "; T; Tab(0)    Next    Print "最小值為 W("; f; ") = "; MinEnd Sub

Answer 2

對不起W.J.s高手，我想可能是我沒說清楚，我的最小值的意思是所有W陣列裡面的數字全部加起來的總和去比較，就會有sum1,sum2,sum3...sum10從這10個總和裡面去找出最小值，謝謝！