用什么方可以生成全部的9位数

来源：百度知道 编辑：UC知道 时间：2024/05/03 02:46:46
我想生成全部的9位数，不知道有没有什么好方法，或都到哪里可以去下载

这个。。。。好多啊，天啊

Sub test()
For a = 1 To 9
For b = 0 To 9
For c = 0 To 9
For d = 0 To 9
For e = 0 To 9
For f = 0 To 9
For g = 0 To 9
For h = 0 To 9
For i = 0 To 9
Debug.Print a & b & c & d & e & f & g & h & i
Next
Next
Next
Next
Next
Next
Next
Next
Next

End Sub

跟你说
生成是很简单的

但是生成出的东西，也就是100000000到999999999
把他们全都写到一个文件里 ，大小大约是17G ！！！

所以我问问你要这东西有什么用？