Scrivendo applicazioni in VB6 potrebbe tornar utile sapere se il codice in esecuzione è in modalità debug oppure no, magari per far eseguire particolari istruzioni solo una volta che il programma sarà compilato.
Un sistema veloce è quello di affidarsi all'oggetto debug; infatti sappiamo che le istruzioni debug.print e debug.assert vengono scartate una volta compilato il nostro sorgente e le seguenti due routine sfruttano proprio tale situazione.

Public Function isDebugMode() As Boolean
    Debug.Assert Not myCheck(isDebugMode)
End Function

Private Function myCheck(ByVal bValue As Boolean) As Boolean
    mycheck = True
End Function

A questo punto, nel nostro sorgente, chiamando la funzione isDebugMode potremo testara esattamente in che condizione ci troviamo.

Private Sub Form_Load()
 If isDebugMode Then
   'Codice da eseguire solo se sono in debug
 Else
   'Codice da eseguire solo una volta compilato
 End If
End Sub