100分求算法：用控件，用还可以，讲到算法就傻眼了！给一组数字，给出组合！

lang_csdn 2004-07-25 01:55:08

原始数据
1
2
3
4
5
6
要求，用这组数组成5 或 6种组合
产生的结果如下：
第一组
1
2
3
4
5
第二组
1
3
4
5
6
第三组
1
2
4
5
6
..........................

请大虾指教！！！
谢谢！

...全文

190 7 打赏收藏转发到动态举报

写回复

用AI写文章

7 条回复

切换为时间正序

请发表友善的回复…

发表回复

Booose 2004-07-25

打赏
举报

没什么用

northwolves 2004-07-25

打赏
举报

参考：http://blog.csdn.net/northwolves/archive/2004/07/25/51090.aspx

Mars.CN 2004-07-25

打赏
举报

学习ing……

BlueBeer 2004-07-25

打赏
举报

是这意思？

test = "123456"
For i = 1 To Len(test)
Debug.Print Replace(test, Mid(test, i, 1), "")
Next

输出：

23456
13456
12456
12356
12346
12345

laisiwei 2004-07-25

打赏
举报

Option Explicit

Private Sub Form_Load()
Dim i As Long, j As Long
Dim t As Long
Dim a(0 To 5) As Long
Dim b As String
a(0) = 1 '原始数据
a(1) = 2
a(2) = 3
a(3) = 4
a(4) = 5
a(5) = 6

For i = 0 To UBound(a)
For j = 0 To UBound(a)
If i <> j Then
b = b & "" & a(j)
End If
Next
MsgBox b
b = ""
Next
End Sub

TechnoFantasy 2004-07-25

打赏
举报

输出结果：

2 3 4 5 6
1 3 4 5 6
1 2 4 5 6
1 2 3 5 6
1 2 3 4 6
1 2 3 4 5

TechnoFantasy 2004-07-25

打赏
举报

Sub outArr(arr() As Integer, index As Integer)
For i = LBound(arr) To UBound(arr)
If (i <> index) Then
Debug.Print arr(i);
End If
Next i
End Sub

Private Sub Command1_Click()
Dim a(5) As Integer
Dim i As Integer

a(0) = 1
a(1) = 2
a(2) = 3
a(3) = 4
a(4) = 5
a(5) = 6

For i = LBound(a) To UBound(a)
outArr a, i
Debug.Print
Next i
End Sub

今日偶然翻到，感慨万千 1：申述：版主，是否扣了我的专家分？ 2：100分急求，随机输出十个小写字母，但是，要求这十个字母不相同 3：求Sn=a+aa+aaa+…+aaa…a（n个a）之值 4：数组题望高手帮忙！ 5：呵呵，来推荐一下我的网站，本站提供大量当今流行的免费的音乐和免费电影，常用软件、游戏、精美图库下载,希望对网友有帮助!顺便散分! 6：VBA请教怎

这篇文章主要面向刚萌生找实习想法而又对面试流程一无所知的小白们，在这里着重分享一些常见大厂的面试经验和特点，希望能对大家有所帮助~ 面试准备简历包装简历不需要写太多的废话，直截了当地突出自己的优势所有加分项都无须犹豫，直接往上写，包括比赛获奖、奖学金、实验室、项目经历等等项目经历是对实习面试加分最多的一项，如果有的话不要嫌麻烦，写得越详细越好，甚至可以提交自己的作品或者链接不要搞太多花里胡哨的！不要吹牛逼！不要为了体现诚实去描述自己的劣势！基础知识算法和数据结构：刷牛客网和leecod

很多国内开发者使用GMap.NET开发地图应用程序，非常方便，可是在实际应用中傻眼了，因为GPS坐标的位置在谷歌和百度地图上出现了严重的便宜，这个是要了命的，地图应用就是要给别人一个精确的Location，解决不了偏差，前面的开发都是白费。但是GMap.NET只是一个对瓦片操作和客户端GDI输出的操作进行了较好的封装，对于有中国特色的国情，跟人家八竿子打不着。所以在有人给GMap.NET的作者提过...

纵观真个的VC工程，这里指那些包含界面的VC工程。主要由三方面构成，算法，资源，以及对资源的调用。算法是整个程序的核心，资源包含一些在算法中可能会用到的数据（二进制）和一些UI方面的显示效果资源。而对资源的调用则是利用开发工具提供的一套标准API（如Win32 API) 对你资源的调用来完成对资源的操作。今天在这里，我主要是想结合自己对资源这一块的一些体会与大家交流交流。不足之

Android架构学习进阶是一条漫长而艰苦的道路，不能靠一时激情，更不是熬几天几夜就能学好的，必须养成平时努力学习的习惯。所以：贵在坚持！上面分享的字节跳动公司2020年的面试真题解析大全，笔者还把一线互联网企业主流面试技术要点整理成了视频和PDF（实际上比预期多花了不少精力），包含知识脉络 + 诸多细节。就先写到这，码字不易，写的很片面不好之处敬请指出，如果觉得有参考价值的朋友也可以关注一下我。