Option Strict On Public Module ApplicationLog Public Sub Main() Dim logFile As String = My.Application.Log.DefaultFileLogWriter.FullLogFileName Console.WriteLine("Location of Application Log File: {0} {1}", vbCrLf, logFile) End Sub End Module