回 帖 发 新 帖 刷新版面

主题:求助:在VB中如何用当前系统日期自动生成文件名

在VB中如何用当前系统日期自动生成文件名?
我用App.Path & "\" & Trim(AA.Adodc2.Recordset("供货商")) & "进货" & ".xls",可以生成以“供货商进货.xls”为名的文件,但当我加入当前系统日期函数并转换为字符串后“App.Path & "\" & CStr(Now) & Trim(AA.Adodc2.Recordset("供货商")) & "进货" & ".xls"”却无法生成文件,不知何故?
希望高手指点迷津!!!

回复列表 (共2个回复)

沙发

date$,time

板凳

App.Path & "\" & CStr(Date)
注意这样转换来的Date的格式是由控制面板中“区域和语言选项”->“区域选项”中的“短日期”格式决定的

我来回复

您尚未登录,请登录后再回复。点此登录或注册