Dim F_MdiClient As System.Windows.Forms.MdiClient
For i = 0 To Me.Controls.Count - 1
If Me.Controls(i).GetType.ToString = "System.Windows.Forms.MdiClient" Then
F_MdiClient = Me.Controls(i)
F_MdiClient.BackgroundImage = My.Resources._1646370
Exit For
End If
Next
其中My.Resources._1646370为图片资源,也可改为你所要图片的路径
For i = 0 To Me.Controls.Count - 1
If Me.Controls(i).GetType.ToString = "System.Windows.Forms.MdiClient" Then
F_MdiClient = Me.Controls(i)
F_MdiClient.BackgroundImage = My.Resources._1646370
Exit For
End If
Next
其中My.Resources._1646370为图片资源,也可改为你所要图片的路径