Purpose Returns the form (if any) active at the time of the error as a string. Syntax Err.Form Example Sub Main() Dim f as File On Error Goto ErrHandler: f.OpenFile ("NonExistentFile", fcRead) Debug "OpenFile success" Exit Sub ErrHandler: Debug "Form:" & Err.Form If Err.Number = 104 Then   Debug "OpenFile failed" Else   Err.Raise End If End Sub