主题：求助：关于排列组合的问题

然后在命令窗口自动输出任意三个字不同顺序的排列结果。

例如：abc、cba、abd等等。这个命令有哪位大侠能帮忙做出来啊，小弟在此不胜感激。谢谢！！

Dim nlist As new List(of String)

nlist.AddRange("a?b?c?d?e?f?g?h?i?j?k?l?m?n?o?p?q?r?s?t".split("?"))

Dim slist As new List(of String)

Do While slist.count<=2

    Dim s As String = nlist(Rand.Next(0,nlist.count-1))

    If slist.Contains(s)=False Then

        slist.Add(s)

    End If

Loop

Dim str As String

For Each s As String In slist

    str=str & s

Next

MessageBox.show(str)

我测试了你的代码也没有问题，但是每执行一次只会出一个结果，我是想执行后把所有结果都在输出部分一次全部列出。请问怎么改动代码啊，兄弟我真的不会。