Note

Access to this page requires authorization. You can try signing in or .

Access to this page requires authorization. You can try .

ApplicationBase.Log Property

Definition

Namespace:
Microsoft.VisualBasic.ApplicationServices
Assembly:
Microsoft.VisualBasic.dll
Assembly:
Microsoft.VisualBasic.Forms.dll
Source:
ApplicationBase.vb
Source:
ApplicationBase.vb
Source:
ApplicationBase.vb
Source:
ApplicationBase.vb
Source:
ApplicationBase.vb

Important

Some information relates to prerelease product that may be substantially modified before it’s released. Microsoft makes no warranties, express or implied, with respect to the information provided here.

Gets an object that provides properties and methods for writing event and exception information to the application's log listeners.

public:
 property Microsoft::VisualBasic::Logging::Log ^ Log { Microsoft::VisualBasic::Logging::Log ^ get(); };
public Microsoft.VisualBasic.Logging.Log Log { get; }
member this.Log : Microsoft.VisualBasic.Logging.Log
Public ReadOnly Property Log As Log

Property Value

Log

The Log object for the current application.

Examples

This example shows how to use the My.Application.Log.WriteEntry method to log tracing information. For more information, see How to: Write Log Messages.

Private Sub GetOpenFormTitles()
 Dim formTitles As New Collection

 Try
 For Each f As Form In My.Application.OpenForms
 ' Use a thread-safe method to get all form titles.
 formTitles.Add(GetFormTitle(f))
 Next
 Catch ex As Exception
 formTitles.Add("Error: " & ex.Message)
 End Try

 Form1.ListBox1.DataSource = formTitles
End Sub

Private Delegate Function GetFormTitleDelegate(f As Form) As String
Private Function GetFormTitle(f As Form) As String
 ' Check if the form can be accessed from the current thread.
 If Not f.InvokeRequired Then
 ' Access the form directly.
 Return f.Text
 Else
 ' Marshal to the thread that owns the form. 
 Dim del As GetFormTitleDelegate = AddressOf GetFormTitle
 Dim param As Object() = {f}
 Dim result As System.IAsyncResult = f.BeginInvoke(del, param)
 ' Give the form's thread a chance process function.
 System.Threading.Thread.Sleep(10)
 ' Check the result.
 If result.IsCompleted Then
 ' Get the function's return value.
 Return "Different thread: " & f.EndInvoke(result).ToString
 Else
 Return "Unresponsive thread"
 End If
 End If
End Function

Applies to

See also


Feedback

Was this page helpful?