Vb6.0 文件日志记录

 1 Private Sub WriteLog(method As String, message As String)
 2 'Write Error LogFile
 3 
 4     Dim ifile As Long
 5     ifile = FreeFile
 6     Open "C:\Logfile" & Format(Now, "YYYYMMDD") & ".txt" For Append As #ifile
 7     Write #ifile, CStr(Now) & "---" & method & "(): " & message
 8     Close #ifile
 9      
10 End Sub
View Code


以上就是文件记录日志的代码，与C#相比而言比较简单；

【推广】 免费学中医，健康全家人
原文地址：https://www.cnblogs.com/Janzen/p/5133553.html