数学问题:7的组合是多少

Dim a, b, c, d, e, f, g
For a = 1 To 30
For b = a To 31
For c = b To 32
For d = c To 33
For e = d To 34
For f = e To 35
For g = f To 36
If a + b + c + d + e + f + g = 120 Then
Print a, b, c, d, e, f, g
End If
Next g
Next f
Next e
Next d
Next c
Next b
Next a
这是36选7个数和为120的.只要修改下就可以解决

不明白你的意思