比如1,3,7,12,13,15,19,20,23,24这10个数字中任选6个组合,VBA函数...答:Sub 组合6in10() '1,3,7,12,13,15,19,20,23,24 Dim Arr(10)Dim I1, I2, I3, I4, I5, I6, M Arr(1) = 1: Arr(2) = 3: Arr(3) = 7: Arr(4) = 12: Arr(5) = 13: Arr(6) = 15: Arr(7) = 19: Arr(8) = 20: Arr(9) = 23: Arr(10) = 24 ...