Public Shared Property LogFile As String

public static string LogFile {get; set;}

string origFile = Log.Config.LogFile;
try
{
    Log.Config.Output |= LogOutputs.LogFile;
    Log.Config.SetOutputFormat(LogOutputs.TraceWrite, "{Message}");

    Log.Config.LogFile = @"\\\\\ { <mal formed!? file> ///{0}.txt";
    Log.Write("Hi1");
    Log.Write("Hi2");
    Log.Write("Hi3");
    Assert.AreEqual(this.GetType().FullName + ": Hi3", _lastTrace);
    Log.Config.LogFile = @"C: mal {formatted} file {0}.txt";
    Log.Write("Hi4");
    Log.Write("Hi5");
    Log.Write("Hi6");
    Assert.AreEqual(this.GetType().FullName + ": Hi6", _lastTrace);
    string path = Path.Combine(Path.GetTempPath(), @"my-path-doesnt-exist");
    if (Directory.Exists(path)) Directory.Delete(path, true);
    Log.Config.LogFile = Path.Combine(path, "log.txt");
    Log.Write("Hi!");
    Assert.IsTrue(Directory.Exists(path));
    Assert.IsTrue(File.Exists(Path.Combine(path, "log.txt")));
    Log.Config.LogFile = origFile;
    Directory.Delete(path, true);

    string dir = Environment.CurrentDirectory;
    Environment.CurrentDirectory = Path.GetDirectoryName(origFile);
    Log.Config.LogFile = Path.GetFileName(origFile);
    Assert.AreEqual(origFile, Log.Config.LogFile);
    Environment.CurrentDirectory = dir;
    Assert.AreEqual(origFile, Log.Config.LogFile);
}
finally
{
    Log.Config.LogFile = origFile;
}

Dim origFile As String = Log.Config.LogFile
Try
    Log.Config.Output = Log.Config.Output Or LogOutputs.LogFile
    Log.Config.SetOutputFormat(LogOutputs.TraceWrite, "{Message}")

    Log.Config.LogFile = "\\\\\ { <mal formed!? file> ///{0}.txt"
    Log.Write("Hi1")
    Log.Write("Hi2")
    Log.Write("Hi3")
    Assert.AreEqual(Me.[GetType]().FullName + ": Hi3", _lastTrace)
    Log.Config.LogFile = "C: mal {formatted} file {0}.txt"
    Log.Write("Hi4")
    Log.Write("Hi5")
    Log.Write("Hi6")
    Assert.AreEqual(Me.[GetType]().FullName + ": Hi6", _lastTrace)
    Dim path As String = Path.Combine(Path.GetTempPath(), "my-path-doesnt-exist")
    If Directory.Exists(path) Then
        Directory.Delete(path, True)
    End If
    Log.Config.LogFile = Path.Combine(path, "log.txt")
    Log.Write("Hi!")
    Assert.IsTrue(Directory.Exists(path))
    Assert.IsTrue(File.Exists(Path.Combine(path, "log.txt")))
    Log.Config.LogFile = origFile
    Directory.Delete(path, True)

    Dim dir As String = Environment.CurrentDirectory
    Environment.CurrentDirectory = Path.GetDirectoryName(origFile)
    Log.Config.LogFile = Path.GetFileName(origFile)
    Assert.AreEqual(origFile, Log.Config.LogFile)
    Environment.CurrentDirectory = dir
    Assert.AreEqual(origFile, Log.Config.LogFile)
Finally
    Log.Config.LogFile = origFile
End Try