Ya encontré algo:
Dim ctl As Control
'Estamos buscando en control que representa el area cliente MDI
For Each ctl In Me.Controls
Try
ctlMDI = CType(ctl, MdiClient)
' Asignamos el color de fondo
ctlMDI.BackColor = Color.YellowGreen
Catch ex As InvalidCastException
End Try
Next
Os lo dejo aqui por si le sirve alguno
