Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) _
      Handles MyBase.Load
        MessageBox.Show("running in the IDE: " + _
        System.Diagnostics.Debugger.IsAttached.ToString())
    End Sub