溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

VB.NET怎么寫Log方法

發布時間:2021-12-02 14:02:58 來源:億速云 閱讀:572 作者:小新 欄目:編程語言

小編給大家分享一下VB.NET怎么寫Log方法,相信大部分人都還不怎么了解,因此分享這篇文章給大家參考一下,希望大家閱讀完這篇文章后大有收獲,下面讓我們一起去了解一下吧!

最近在項目中有用到VB.NET寫Log方法的功能.具體代碼如下:

Code

  1. Public Sub WriteLog()Sub 
    WriteLog(ByVal Msg As String)  

  2. Dim varAppPath As String  

  3. varAppPath = System.AppDomain.
    CurrentDomain.SetupInformation.
    ApplicationBase + "log"  

  4. System.IO.Directory.CreateDirectory
    (varAppPath)  

  5. Dim head As String  

  6. head = System.DateTime.Now.Hour.
    ToString() + ":" + System.DateTime.
    Now.Minute.ToString()  

  7. headhead = head + ":" + System.DateTime.
    Now.Second.ToString() + ":" + 
    System.DateTime.Now.Millisecond.ToString()  

  8. Msg = head + System.Environment.
    NewLine + Msg + System.Environment.NewLine  

  9. Dim strDate As String  

  10. strDate = System.DateTime.Now.
    ToString("yyyyMMdd")  

  11. Dim strFile As String  

  12. strFile = varAppPath + "\" + 
    strDate + ".log"  

  13. Dim SW As System.IO.StreamWriter  

  14. SW = New System.IO.StreamWriter
    (strFile, True)  

  15. SW.WriteLine(Msg)  

  16. SW.Flush()  

  17. SW.Close()  

  18. End Sub 

以上是“VB.NET怎么寫Log方法”這篇文章的所有內容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內容對大家有所幫助,如果還想學習更多知識,歡迎關注億速云行業資訊頻道!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

亚洲午夜精品一区二区_中文无码日韩欧免_久久香蕉精品视频_欧美主播一区二区三区美女