求0至9这十个数字组成的所有三位数的组合,用VB6.0

求0至9这十个数字组成的所有三位数的组合,用VB6.0
百位可以是0,如012
求的是组合,不是排列.如012 021 120 102 201 210 这6个数只需输出012就可以了,要像输写012一样```最小的数字在前面,最大的数字在最后
总供的数据个数是120个吧(应当是的),输出到text1
随便用什么方法求,越特别越好,
一楼的我看过了,是可以用,虽说他可能用的是VBnet,但是我想要其它不一样的方法,(特别的方法),呵呵,再等下,没人答就给一楼你分了,
anjindan 1年前 已收到1个回答 举报

逍遥不笑 春芽

共回答了15个问题采纳率:100% 举报

是120 个.大体上这样就行:
for a = 0 to 7
for b = a+1 to 8
for c = b+1 to 9
text1.value = text1.value & a & b & c & vbCrlf
next
next
next
其他的什么窗体、按钮、触发什么的自己随便搞下吧.

1年前

3
可能相似的问题
Copyright © 2024 YULUCN.COM - 雨露学习互助 - 16 q. 0.267 s. - webmaster@yulucn.com