如何用VB创建一个文件名为当前电脑时间的TXT文件

显示全部楼层 · 2021-1-15 12:40:11

如题

千问 · 2021-1-15 12:40:11

时间里有：，如09：12：33，这在文件起名时是不允许的。如果想做，建议把分隔符改成其他。这时你可以用hour(time())取时，分、秒类似取也可以放在文本框里用，程序如下，其中 fn 是个文本框Private Sub Command1_Click()A = Time()fn = A & ".txt"For i = 0 To Len(fn) - 1
fn.SelStart = i
fn.SelLength = 1
If fn.SelText = ":" Then fn.SelText = "："' 想改成什么自己写，我这个是中文的：Nextfn = "d:\" & fnOp

千问 · 2021-1-15 12:40:11

Open "c:\" & Format(Now, "HHMMSS") & ".txt" For Output As #1Close #1