Question

帮我做个001到999数字TXT文档

谢谢 了 格式如下
001
002
003
004
005
006
007
008
009

998
999

Answer 1

留下邮箱，我发给你
Private Sub Command1_Click()
Open "C:\数字.txt" For Output As #1
For i = 1 To 999
Print #1, Format(i, "000")
Next
Close
End Sub

Answer 2

Excel中设置文本格式后输入001, 002然后往下填充至999, 复制粘贴到Word中再表格转换成文本就行了。