如何建立一个纯数字的密码字典？

例如生成六位密码，用六个变量，做六层 0 到 9 的 For 循环，把六个循环变量分别转为字符串再连接，得到六位的字符串。

数字转字符的 Basic 代码：

Dim cv As Integer,cc As String

'Let cv = Expression

cc = Mid(Str(cv), 2, 1)