Public gobjLog as Log Public Function Main(ByVal CmdArgs() As String) As Integer ... gobjLog = New Log(databaseMgr) ... End Function Sample of the Log class Option Strict On Option Explicit On Friend Class Log Implements ILog, IDisposable ... Public Sub New(ByRef database As IDatabase) SetLogging() databaseMgr = database End Sub ... End Class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)