Visual Basic .NET Language
अपने आवेदन डिबगिंग

परिचय

कंसोल में डीबग करें

Module Module1
    Sub Main()
        Debug.WriteLine("This line will be shown in the Visual Studio output console")

        Console.WriteLine("Press a key to exit")
        Console.ReadKey()

        Debug.WriteLine("End of application")
    End Sub
End Module

उत्पादन करेंगे:

अपने डिबग आउटपुट को इंडेंट करना

Module Module1

    Sub Main()
        Debug.WriteLine("Starting aplication")

        Debug.Indent()
        LoopAndDoStuff(5)
        Debug.Unindent()

        Console.WriteLine("Press a key to exit")
        Console.ReadKey()

        Debug.WriteLine("End of application")
    End Sub

    Sub LoopAndDoStuff(Iterations As Integer)
        Dim x As Integer = 0
        Debug.WriteLine("Starting loop")
        Debug.Indent()
        For i As Integer = 0 To Iterations - 1
            Debug.Write("Iteration " & (i + 1).ToString() & " of " & Iterations.ToString() & ": Value of X: ")
            x += (x + 1)
            Debug.WriteLine(x.ToString())
        Next
        Debug.Unindent()
        Debug.WriteLine("Loop is over")
    End Sub
End Module

उत्पादन करेंगे:

एक पाठ फ़ाइल में डीबग करें

अपने आवेदन की शुरुआत में, आपको डीबग वर्ग की श्रोताओं की सूची में एक TextWriterTraceListener जोड़ना होगा।

Module Module1

    Sub Main()
        Debug.Listeners.Add(New TextWriterTraceListener("Debug of " & DateTime.Now.ToString() & ".txt"))

        Debug.WriteLine("Starting aplication")

        Console.WriteLine("Press a key to exit")
        Console.ReadKey()

        Debug.WriteLine("End of application")
    End Sub
End Module

उत्पादित सभी डिबग कोड दृश्य स्टूडियो कंसोल और आपके द्वारा चुनी गई पाठ फ़ाइल में आउटपुट किया जाएगा।

यदि फ़ाइल हमेशा समान होती है:

Debug.Listeners.Add(New TextWriterTraceListener("Debug.txt"))

आउटपुट को हर बार फ़ाइल में जोड़ा जाएगा और GUID से शुरू होने वाली एक नई फ़ाइल तब आपका फ़ाइल नाम जेनरेट किया जाएगा।