输出所有组合

[無影風]

输出52张扑克选7的所有组合,蒙圈啊.

[Tiger_Zhao]

就是7层循环啊。
最内层循环输出一次这7个循环变量，就是一组结果。
还有控制好内层循环范围始终比外层变量大，就是组合（排除交换位置的结果）。

For i1 = 1 To 52 - 6
    For i2 = i1 + 1 To 52 - 5
        ...
            For i7 = i6 + 1 To 52
                Debug.Print i1, i2, i3, i4, i5, i6, i7
            Next
        ...
    Next
Next

又： 共计 (52*51*50*49*48*47*46)/(1*2*3*4*5*6*7) = 133784560 组结果，要跑死啊！