永发信息网

新建N个文件夹,并把名字分别名为1,2,3....N,怎么做呢?

答案:2  悬赏:10  手机版
解决时间 2021-12-17 17:31
  • 提问者网友:孤酒醉
  • 2021-12-17 09:24
用VB,bat,dos都可以。
最佳答案
  • 五星知识达人网友:失而复得
  • 2021-12-17 10:28
批处理
@echo off
set n=10
for /l %%i in (1,1,%n%) do md %%i
全部回答
  • 1楼网友:尘沙飞扬
  • 2021-12-17 10:47
sub addnewfolder() dim f as integer dim foldername as string n = inputbox("请输入需要创建的工程个数:", "请输入需要创建的工程文件夹个数:") for i = 1 to n foldername = i mypath = "d:\" ' 指定路径。 myname = dir(mypath, vbdirectory) ' 找寻第一项。 do while myname <> "" ' 开始循环。 ' 跳过当前的目录及上层目录。 f=0 if (getattr(mypath & myname)) = vbdirectory then if myname = foldername then f = 1 exit do end if end if myname = dir ' 查找下一个目录。 loop if f = 0 then dim fso as object set fso = createobject("scripting.filesystemobject") fso.createfolder ("d:" & foldername) else msgbox "存在同名工程" & foldername & vblf & "没有为你重创建" end if next end sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯