Imports System.Diagnostics Public MustInherit Class Tracer Inherits TraceListener Public Sub New() End Sub Public Overloads Sub WriteLine(ByVal message As String, ByVal category As String) End Sub Public Overloads Shared Sub Write(ByVal message As String, ByVal category As String) End Sub End Class