读书人

怎么列举出一到三位数的数字和小写字母

发布时间: 2013-06-19 10:26:41 作者: rapoo

如何列举出一到三位数的数字和小写字母的所有组合?
如题,我想列出一到三位数的数字和字母的所有组合,比如:
1,2,3,4,5,6,7......
1a,1b,1c,........9z...
1a1,1a2,1a3,......

用一个循环将所有的可能都Debug.writeline出来,怎么写,想了半天都没想出来。
[解决办法]

string[] m = { " ", "0", "1", "2", ... "9", "a", "b", ... "z" };
var query = from x in m
from y in m
from z in m
where x + y + z != " "
select (x + y + z).Trim();
foreach (string s in query)
Console.WriteLine(s);

[解决办法]
3楼的是C#转成VB.net是
Dim m As String() = {" ", "0", "1", "2", "3", "4", _
"5", "6", "7", "7", "9", "a", _
"b", "c", "d", "e", "f", "i", _
"j", "k", "l", "m", "n", "o", _
"p", "q", "r", "s", "t", "u", _
"v", "w", "x", "y", "z"}
Dim a
Dim query = From x In m
From y In m
From z In m
Where x + y + z <> (x + y + z).Trim()
For Each s In query
a = a & "
[解决办法]
" & s.ToString
Next
Me.RichTextBox1.Text = a

读书人网 >VB Dotnet

热点推荐