#Region "Change Background Color of MDIParent : bgcolor()" 'to change the background color of mdiparent 'for more : http://acomputerengineer.wordpress.com Private Sub bgColor() Dim child As Control For Each child In Me.Controls If TypeOf child Is MdiClient Then child.BackColor = Color.CadetBlue Exit For End If Next child = Nothing End Sub #End Region