UC知道VB如何读取系统时间和编写变量的新建文件夹
来源：百度知道 编辑：UC知道 时间：2024/05/10 08:00:17
本人搞工控的，是个VB菜鸟，向大虾求询一下：
项目应用中，本人想用VB实现，一个功能：
读取系统时间，先判断年份（因程序会用上N年），
建立以年份为名的文件夹，
再判断月份，在年份文件夹下建立月份子文件夹，
所以问题有两点：
1.如何读取系统的年份和月份，并且赋值给变量，进行判断？
2.在建立文件夹时，如何用变量名来代替文件夹名称？
也就是修改一下：
DIM NAME
NAME=???
Dim fso
Set fso = CreateObject("Scripting.filesystemobject")
fso.CreateFolder("e:\\NAME")
即NAME为一个变量名.
以上，谢谢啦！
项目应用中，本人想用VB实现，一个功能：
读取系统时间，先判断年份（因程序会用上N年），
建立以年份为名的文件夹，
再判断月份，在年份文件夹下建立月份子文件夹，
所以问题有两点：
1.如何读取系统的年份和月份，并且赋值给变量，进行判断？
2.在建立文件夹时，如何用变量名来代替文件夹名称？
也就是修改一下：
DIM NAME
NAME=???
Dim fso
Set fso = CreateObject("Scripting.filesystemobject")
fso.CreateFolder("e:\\NAME")
即NAME为一个变量名.
以上，谢谢啦！
系统时间可以用Month(Date),Year(Date),Date表示
Date是指当前时间，即系统任务栏所示的时间
Month（Date）是指当前时间下的月份
Year（Date）是指当前时间下的年份
至于你说的给name赋值。可以直接写成：
name=Month(Date)或者name=Yeat(Date)
不过你的变量最好写成Folder_Month和Folder_Year
我建议建立年份文件夹：
Folder_Year=Year(Date)
fso.CreateFolder("e:\" & Folder_Year)
建立月份文件夹:
Folder_Month=Month(Date)
fso.CreateFolder("e:\" & Folder_Name & "\" & Folder_Month)
我感觉..用变量还不如直接用.DTpicker...这个控件里会直接显示过去的年份与未来的年份...用他来做容器会更好一此..