Example:

1. Sub PrintExample ()

   1. Dim Msg, Pi' Declare variables.

      Let Pi = 4 * _Atn(1)' Calculate Pi.

      Msg = "Pi is equal to " & Str(Pi)

      MsgBox Msg' Display results.

      Print Pi' Print the results in the Compiler Messages window

   End Sub