Modificar color de Formulario

[chan]

Hola, estoy armando una opción de menú que a través de un CommonDialog.ShowColor permite modificar el color de un formulario, ahora bien, lo que realmente quiero es que se modifiquen todos los formularios de la aplicación sin que tenga que hacerlo yo uno por uno. Esto es lo que hago yo:

With cdialog
cdialog.ShowColor
color = cdialog.color
End With
frm1.BackColor = color ' No quiero moficarlo uno por uno, quisiera usar un For
frm2.BackColor = color ' pero no se como hacerlo.
frm3.BackColor = color
frm4.BackColor = color

Gracias!!!