Private Sub Form_Load()
If RunningInIDE = True Then
MsgBox "The application runs in the VB IDE"
Else
MsgBox "The application runs in compiled form"
End If
End Sub