有这样一个程序,该如何去设计..

Question

有一个数值是54321,我想让它分开写入一些文本文件中现有的文本有 
5000.txt
4000.txt
3000.txt
2000.txt
1000.txt
900.txt
800.txt
700.txt
600.txt
500.txt
400.txt
300.txt
200.txt
100.txt
90.txt
80.txt
70.txt
.
.
.
10.txt
9.txt
8.txt
.
.
.
1.txt是不是通过求余数这样?

Answer 1

就是把 54321 这个数字
写入 5000.txt
400.txt
20.txt
1.txt

Answer 2

哦，
dim lngValue as long 
dim intW as integer
dim intQ as integer
dim intB as integer
dim intS as integer
dim intG as integer
lngValue=54321
intW=lngValue\10000
intQ=(lngValue mod 10000) \1000
intB=(lngValue-intW*10000-intQ*1000)\100
intS=(lngValue-intW*10000-intQ*1000-intB*100)\10
intG=lngValue mod 10