Questo codice cambia lo sfondo di tutti i controlli del form.
codice:
On Error Resume Next
Dim ctrl As Control
For Each ctrl In Me.Controls
    ctrl.BackColor = &HFF0000 'o il colore che preferisci
Next
On Error Goto 0