VB中如何将日期和时间输出到TXT文档中

来源:百度知道 编辑:UC知道 时间:2024/06/15 22:52:14
我编了个程序,将时间日期分别显示在TEXT1与TEXT2中,
Private Sub Command1_Click()
Text1.Text = "今天是:" & Format(Date, "yy-mm-dd")
End Sub

Private Sub Command2_Click()
text2.Text = "北京时间:" & format(Time, "hh:mm:ss")
End Sub

这个很简单,现在我想达到这样的目的,点击Command1时在Text1.Text中显示的时间同时保存到C:\3.txt中,是保存,偷偷的,不需要另存为的那种,我怎么也不会编这个程序,高手帮我忙看看,感激不尽!!
我还有十的积分全给了

很简单呀
Private Sub Command1_Click()
Text1.Text = "今天是:" & Format(Date, "yy-mm-dd")
open "C:\3.txt" for output as #1
print #1, text1.text
close #1
End Sub

Private Sub Command1_Click()
Text1.Text = "今天是:" & Format(Date, "yy-mm-dd")
Open "C:\3.txt" For Output As #1
Print #1, Text1.Text
Close #1
End Sub
如果你需要什么作用我还能帮你