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

如何列举出一到三位数的数字和小写字母的所有组合？
如题，我想列出一到三位数的数字和字母的所有组合，比如：
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