還有其它什么辦法可以改進代碼,加快速度。
方法1
a = Array(0, 120, 5, 3, 12, 4, 55, 37, 128, 119, 8, 15, 16, 18, 20, 55, 650, 860, 125)
For k1 = 1 To 6
For k2 = 2 To 7
For k3 = 3 To 8
For k4 = 4 To 9
For k5 = 5 To 10
For k6 = 5 To 11
b = a(k1) + a(k2) + a(k3) + a(k4) + a(k5) + a(k6)
Debug.Print a(k1); "+"; a(k2); "+"; a(k3); "+"; a(k4); "+"; a(k5); "+"; a(k6); "="; b
Next k6
Next k5
Next k4
Next k3
Next k2
Next k1
方法二
a = Array(0, 120, 5, 3, 12, 4, 55, 37, 128, 119)
For k1 = 1 To 6
b = a(k1)
For k2 = 2 To 7
b += a(k2)
For k3 = 3 To 8
b += a(k3)
For k4 = 4 To 9
b += a(k4)
Debug.Print a(k1); "+"; a(k2); "+"; a(k3); "+"; a(k4); "="; b
Next k4
Next k3
Next k2
Next k1
uj5u.com熱心網友回復:
你這兩種方式其實是一樣的,換湯不換藥uj5u.com熱心網友回復:
就是求組合數嗎轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/58959.html
標籤:基礎類
