private sub command1_click()dim i as longopen "e:1.txt" for append as #1for i = 1 to 99999 print #1, format(i, "00000")next iclose #1msgbox "保存完毕"end sub
1239 浏览 3 回答
评论 36
评论 2
评论 21
评论 7
评论 4
8053 浏览 5 回答
7510 浏览 8 回答
6436 浏览 6 回答
6813 浏览 6 回答
2.3万 浏览 5 回答
1.2万 浏览 6 回答
9799 浏览 1 回答
2万 浏览 6 回答
7302 浏览 6 回答
5668 浏览 6 回答
3610 浏览 9 回答
9372 浏览 3 回答
5285 浏览 8 回答
9166 浏览 4 回答
6508 浏览 8 回答
经过核实后将会做出处理,感谢您为社区和谐做出贡献。
{{adWord}} {{factory}}
{{adWord}}