求0至9这十个数字组成的所有三位数的组合,用VB6.0
百位可以是0,如012
求的是组合,不是排列.如012 021 120 102 201 210 这6个数只需输出012就可以了,要像输写012一样```最小的数字在前面,最大的数字在最后
总供的数据个数是120个吧(应当是的),输出到text1
随便用什么方法求,越特别越好,
一楼的我看过了,是可以用,虽说他可能用的是VBnet,但是我想要其它不一样的方法,(特别的方法),呵呵,再等下,没人答就给一楼你分了,
人气:498 ℃ 时间:2019-12-18 19:37:27
解答
是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
其他的什么窗体、按钮、触发什么的自己随便搞下吧.
推荐
猜你喜欢
- 有一个正方形的池塘,四周栽上树,每方载6棵,共栽22棵,如何栽?
- 解不等式x²-2x-3≤0,并用区间表示不等式解集.
- 在电路板上测电阻,如何根据图纸找出那些元件会影响测量值.
- Move the train brake lever to 2 position,press button
- 把一块棱长为10dm的正方体铁块锻造成宽和长都是50cm的长方体铁条,能锻造成多长的铁条?
- 已知a分之1 +b分之1=6分之1,b分之1+c分之1=9分之1 c分之1+a分之1=15分之1 a b c等于多少?
- 一个圆锥形容器的容积300平方厘米,从里面量高是12厘米,它的底面积是多少平方厘米?
- 澳大利亚的位置 范围