求一个vb字符算法，应该是排列算法吧

Question

vb字符算法排列算法

Answer 1

是按给定的字符串ABCDE每个字符的位置排列

Answer 2

如果只有abcde5个字符，直接套5层for...next搞定。如果层次较多的话，那就需要一点技巧了....

Answer 3

是不是要先求出ABCDE中每个字符有多少个可能值的数量，然后就循环求出全部排列结果

Answer 4

ABCDE只是举个例子，长度会变，而且每个字符的的值也是变的

Answer 5

字符串和每个字符的值如下：
A   B    C   D   E
A0 B0 C0 D0
A1 B1 C1 D1
A2       C2
            C3手工排列的结果
A字符有三个值，循环三次，其它字符都取第一个值
A0 B0 C0 D0 E
A1 B0 C0 D0 E
A2 B0 C0 D0 E
把A字符排列结果存入一个变量S中B字符有二个值，循环二次，其它字符都取第一个值
A0 B0 C0 D0 E  '这个是重复的排列，要去掉 
A0 B1 C0 D0 E
把B字符排列去掉重复的结果加入到变量S中

Answer 6

仅供参考，尽管不是VB6：//给定一个数组a[9]={'a','b','c','1','2','3','!','@','#'}，
//要求程序启动后提示输入整数n(0<n<9),根据输入整数进行输出，
//输出规则为：从一行一字符到n行n字符遍历数组中所有字符，比如：
//n=1,则输出：
//a,b,c,1,2,3,!,@,#
//n=2.则如下输出：
//a,b,c,1,2,3,!,@,#
//aa,ab,ac,a1,a2,a3,a!,a@,a#,ba,bb,bc,b1,b2,b3,b!,b@,b#,ca,cb,cc,c1,c2,c3,c!,c@,c#,1a,1b,1c,11,12,13,1!,1@,1#,2a,2b,2c,21,22,23,2!,2@,2#,3a,3b,3c,31,32,33,3!,3@,3#,!a,!b,!c,!1,!2,!3,!!,!@,!#,@a,@b,@c,@1,@2,@3,@!,@@,@#,a,#b,#c,#1,#2,#3,#!,#@,##
//……
#include <stdio.h>
char a[9]={'a','b','c','1','2','3','!','@','#'};
char t[9];
void out(int m,int L) {
    int i;
    if (m==L) {
        for (i=0;i<m;i++) printf("%c",t[i]);
        for (i=0;i<m;i++) if ('#'!=t[i]) break;
        if (i<m) printf(",");
        return;
    }
    for (i=0;i<9;i++) {
        t[L]=a[i];
        out(m,L+1);
    }
}
void out1_n(int n) {
    int m;    for (m=1;m<=n;m++) {
        out(m,0);
        printf("\n");
    }
}
int main() {
    int n;    while (1) {
        printf("Input n(0<n<9):");
        fflush(stdout);
        rewind(stdin);
        if (1==scanf("%d",&n)) {
            if (0<n && n<9) break;
        }
    }
    out1_n(n);
    return 0;
}
//Input n(0<n<9):1
//a,b,c,1,2,3,!,@,#
//
//Input n(0<n<9):2
//a,b,c,1,2,3,!,@,#
//aa,ab,ac,a1,a2,a3,a!,a@,a#,ba,bb,bc,b1,b2,b3,b!,b@,b#,ca,cb,cc,c1,c2,c3,c!,c@,c#,1a,1b,1c,11,12,13,1!,1@,1#,2a,2b,2c,21,22,23,2!,2@,2#,3a,3b,3c,31,32,33,3!,3@,3#,!a,!b,!c,!1,!2,!3,!!,!@,!#,@a,@b,@c,@1,@2,@3,@!,@@,@#,#a,#b,#c,#1,#2,#3,#!,#@,##
//
//Input n(0<n<9):3
//a,b,c,1,2,3,!,@,#
//aa,ab,ac,a1,a2,a3,a!,a@,a#,ba,bb,bc,b1,b2,b3,b!,b@,b#,ca,cb,cc,c1,c2,c3,c!,c@,c#,1a,1b,1c,11,12,13,1!,1@,1#,2a,2b,2c,21,22,23,2!,2@,2#,3a,3b,3c,31,32,33,3!,3@,3#,!a,!b,!c,!1,!2,!3,!!,!@,!#,@a,@b,@c,@1,@2,@3,@!,@@,@#,#a,#b,#c,#1,#2,#3,#!,#@,##
//aaa,aab,aac,aa1,aa2,aa3,aa!,aa@,aa#,aba,abb,abc,ab1,ab2,ab3,ab!,ab@,ab#,aca,acb,acc,ac1,ac2,ac3,ac!,ac@,ac#,a1a,a1b,a1c,a11,a12,a13,a1!,a1@,a1#,a2a,a2b,a2c,a21,a22,a23,a2!,a2@,a2#,a3a,a3b,a3c,a31,a32,a33,a3!,a3@,a3#,a!a,a!b,a!c,a!1,a!2,a!3,a!!,a!@,a!#,a@a,a@b,a@c,a@1,a@2,a@3,a@!,a@@,a@#,a#a,a#b,a#c,a#1,a#2,a#3,a#!,a#@,a##,baa,bab,bac,ba1,ba2,ba3,ba!,ba@,ba#,bba,bbb,bbc,bb1,bb2,bb3,bb!,bb@,bb#,bca,bcb,bcc,bc1,bc2,bc3,bc!,bc@,bc#,b1a,b1b,b1c,b11,b12,b13,b1!,b1@,b1#,b2a,b2b,b2c,b21,b22,b23,b2!,b2@,b2#,b3a,b3b,b3c,b31,b32,b33,b3!,b3@,b3#,b!a,b!b,b!c,b!1,b!2,b!3,b!!,b!@,b!#,b@a,b@b,b@c,b@1,b@2,b@3,b@!,b@@,b@#,b#a,b#b,b#c,b#1,b#2,b#3,b#!,b#@,b##,caa,cab,cac,ca1,ca2,ca3,ca!,ca@,ca#,cba,cbb,cbc,cb1,cb2,cb3,cb!,cb@,cb#,cca,ccb,ccc,cc1,cc2,cc3,cc!,cc@,cc#,c1a,c1b,c1c,c11,c12,c13,c1!,c1@,c1#,c2a,c2b,c2c,c21,c22,c23,c2!,c2@,c2#,c3a,c3b,c3c,c31,c32,c33,c3!,c3@,c3#,c!a,c!b,c!c,c!1,c!2,c!3,c!!,c!@,c!#,c@a,c@b,c@c,c@1,c@2,c@3,c@!,c@@,c@#,c#a,c#b,c#c,c#1,c#2,c#3,c#!,c#@,c##,1aa,1ab,1ac,1a1,1a2,1a3,1a!,1a@,1a#,1ba,1bb,1bc,1b1,1b2,1b3,1b!,1b@,1b#,1ca,1cb,1cc,1c1,1c2,1c3,1c!,1c@,1c#,11a,11b,11c,111,112,113,11!,11@,11#,12a,12b,12c,121,122,123,12!,12@,12#,13a,13b,13c,131,132,133,13!,13@,13#,1!a,1!b,1!c,1!1,1!2,1!3,1!!,1!@,1!#,1@a,1@b,1@c,1@1,1@2,1@3,1@!,1@@,1@#,1#a,1#b,1#c,1#1,1#2,1#3,1#!,1#@,1##,2aa,2ab,2ac,2a1,2a2,2a3,2a!,2a@,2a#,2ba,2bb,2bc,2b1,2b2,2b3,2b!,2b@,2b#,2ca,2cb,2cc,2c1,2c2,2c3,2c!,2c@,2c#,21a,21b,21c,211,212,213,21!,21@,21#,22a,22b,22c,221,222,223,22!,22@,22#,23a,23b,23c,231,232,233,23!,23@,23#,2!a,2!b,2!c,2!1,2!2,2!3,2!!,2!@,2!#,2@a,2@b,2@c,2@1,2@2,2@3,2@!,2@@,2@#,2#a,2#b,2#c,2#1,2#2,2#3,2#!,2#@,2##,3aa,3ab,3ac,3a1,3a2,3a3,3a!,3a@,3a#,3ba,3bb,3bc,3b1,3b2,3b3,3b!,3b@,3b#,3ca,3cb,3cc,3c1,3c2,3c3,3c!,3c@,3c#,31a,31b,31c,311,312,313,31!,31@,31#,32a,32b,32c,321,322,323,32!,32@,32#,33a,33b,33c,331,332,333,33!,33@,33#,3!a,3!b,3!c,3!1,3!2,3!3,3!!,3!@,3!#,3@a,3@b,3@c,3@1,3@2,3@3,3@!,3@@,3@#,3#a,3#b,3#c,3#1,3#2,3#3,3#!,3#@,3##,!aa,!ab,!ac,!a1,!a2,!a3,!a!,!a@,!a#,!ba,!bb,!bc,!b1,!b2,!b3,!b!,!b@,!b#,!ca,!cb,!cc,!c1,!c2,!c3,!c!,!c@,!c#,!1a,!1b,!1c,!11,!12,!13,!1!,!1@,!1#,!2a,!2b,!2c,!21,!22,!23,!2!,!2@,!2#,!3a,!3b,!3c,!31,!32,!33,!3!,!3@,!3#,!!a,!!b,!!c,!!1,!!2,!!3,!!!,!!@,!!#,!@a,!@b,!@c,!@1,!@2,!@3,!@!,!@@,!@#,!#a,!#b,!#c,!#1,!#2,!#3,!#!,!#@,!##,@aa,@ab,@ac,@a1,@a2,@a3,@a!,@a@,@a#,@ba,@bb,@bc,@b1,@b2,@b3,@b!,@b@,@b#,@ca,@cb,@cc,@c1,@c2,@c3,@c!,@c@,@c#,@1a,@1b,@1c,@11,@12,@13,@1!,@1@,@1#,@2a,@2b,@2c,@21,@22,@23,@2!,@2@,@2#,@3a,@3b,@3c,@31,@32,@33,@3!,@3@,@3#,@!a,@!b,@!c,@!1,@!2,@!3,@!!,@!@,@!#,@@a,@@b,@@c,@@1,@@2,@@3,@@!,@@@,@@#,@#a,@#b,@#c,@#1,@#2,@#3,@#!,@#@,@##,#aa,#ab,#ac,#a1,#a2,#a3,#a!,#a@,#a#,#ba,#bb,#bc,#b1,#b2,#b3,#b!,#b@,#b#,#ca,#cb,#cc,#c1,#c2,#c3,#c!,#c@,#c#,#1a,#1b,#1c,#11,#12,#13,#1!,#1@,#1#,#2a,#2b,#2c,#21,#22,#23,#2!,#2@,#2#,#3a,#3b,#3c,#31,#32,#33,#3!,#3@,#3#,#!a,#!b,#!c,#!1,#!2,#!3,#!!,#!@,#!#,#@a,#@b,#@c,#@1,#@2,#@3,#@!,#@@,#@#,##a,##b,##c,##1,##2,##3,##!,##@,###
//

Answer 7

A的每个值与B的每个值排列
A0 B0
A0 B1
A1 B0
A1 B1
A2 B0
A2 B1把AB排列的结果再与C排列
A0 B0 C0
A0 B0 C1
A0 B0 C2
A0 B0 C3A0 B1 C0
A0 B1 C1
A0 B1 C2
A0 B1 C3A1 B0 C0
A1 B0 C1
A1 B0 C2
A1 B0 C3A1 B1 C0
A1 B1 C1
A1 B1 C2
A1 B1 C3A2 B0 C0
A2 B0 C1
A2 B0 C2
A2 B0 C3A2 B1 C0
A2 B1 C1
A2 B1 C2
A2 B1 C3把ABC排列结果再与D排列
A0 B0 C0 D0
A0 B0 C0 D1
A0 B0 C1 D0
A0 B0 C1 D1
A0 B0 C2 D0
A0 B0 C2 D1
A0 B0 C3 D0
A0 B0 C3 D1A0 B1 C0 D0
A0 B1 C0 D1
A0 B1 C1 D0
A0 B1 C1 D1
A0 B1 C2 D0
A0 B1 C2 D1
A0 B1 C3 D0
A0 B1 C3 D1A1 B0 C0 D0
A1 B0 C0 D1
A1 B0 C1 D0
A1 B0 C1 D1
A1 B0 C2 D0
A1 B0 C2 D1
A1 B0 C3 D0
A1 B0 C3 D1A1 B1 C0 D0
A1 B1 C0 D1
A1 B1 C1 D0
A1 B1 C1 D1
A1 B1 C2 D0
A1 B1 C2 D1
A1 B1 C3 D0
A1 B1 C3 D1A2 B0 C0 D0
A2 B0 C0 D1
A2 B0 C1 D0
A2 B0 C1 D1
A2 B0 C2 D0
A2 B0 C2 D1
A2 B0 C3 D0
A2 B0 C3 D1
A2 B1 C0 D0
A2 B1 C0 D1
A2 B1 C1 D0
A2 B1 C1 D1
A2 B1 C2 D0
A2 B1 C2 D1
A2 B1 C3 D0
A2 B1 C3 D1把ABCD的结果再与E排列
A0 B0 C0 D0 E
A0 B0 C0 D1 E
A0 B0 C1 D0 E
A0 B0 C1 D1 E
A0 B0 C2 D0 E
A0 B0 C2 D1 E
A0 B0 C3 D0 E
A0 B0 C3 D1 EA0 B1 C0 D0 E
A0 B1 C0 D1 E
A0 B1 C1 D0 E
A0 B1 C1 D1 E
A0 B1 C2 D0 E
A0 B1 C2 D1 E
A0 B1 C3 D0 E
A0 B1 C3 D1 EA1 B0 C0 D0 E
A1 B0 C0 D1 E
A1 B0 C1 D0 E
A1 B0 C1 D1 E
A1 B0 C2 D0 E
A1 B0 C2 D1 E
A1 B0 C3 D0 E
A1 B0 C3 D1 EA1 B1 C0 D0 E
A1 B1 C0 D1 E
A1 B1 C1 D0 E
A1 B1 C1 D1 E
A1 B1 C2 D0 E
A1 B1 C2 D1 E
A1 B1 C3 D0 E
A1 B1 C3 D1 EA2 B0 C0 D0 E
A2 B0 C0 D1 E
A2 B0 C1 D0 E
A2 B0 C1 D1 E
A2 B0 C2 D0 E
A2 B0 C2 D1 E
A2 B0 C3 D0 E
A2 B0 C3 D1 E
A2 B1 C0 D0 E
A2 B1 C0 D1 E
A2 B1 C1 D0 E
A2 B1 C1 D1 E
A2 B1 C2 D0 E
A2 B1 C2 D1 E
A2 B1 C3 D0 E
A2 B1 C3 D1 E
谢谢大家，我手工排列出算法了，这个算法可能效率不是很好，但是先用着吧