求写VBS，导出文件名格式为：时间+按钮标题.txt。详细说明见截图和附件

自由心　发表于：2016-01-17 15:43:13 　

求写VBS，导出文件名格式为：时间+按钮标题.txt。

详细说明见截图和附件

朱先生发表于：2016-01-17 16:57:27

If Nz(strFileName) = "" Then strFileName = Format(Now(), "yyyymmdd_hhmm") & ".txt"

在上一句前加入

YYYY = Mid(Now(), 1, 4)
MM = Mid(Now(), 6, 2)
DD = Mid(Now(), 9, 2)
HMM = Mid(Now(), 11, 4)

试试看

落尘_小新发表于：2016-01-17 17:05:22

用按钮标题做文件名的话可以修改该按钮单击事件代码如下：

Private Sub cmdOut_Click()
Call funExportToTxt(Me.Child22, Format(Now(), "yyyymmdd_hhmm_") & Me.cmdOut.Caption & ".txt")
End Sub

自由心发表于：2016-01-18 09:03:19

可以了

总记录：3篇页次：1/1 9 1 :

Access交流中心