Cómo colocar una imagen de fondo ajustada a la ventana en un MDI

      Private Sub MDIForm_Resize()
      On Error Resume Next
      Dim ImageWidth As Single
      Dim ImageHeight As Single
      picStretch.Visible = False
      picStretch.AutoRedraw = True
      picStretch.Height = Me.ScaleHeight 'By Mirador
      ImageWidth = picStretch.ScaleX(picStretch.Picture.Width, vbHimetric, vbTwips)
      ImageHeight = picStretch.ScaleY(picStretch.Picture.Height, vbHimetric, vbTwips)
      picStretch.PaintPicture picStretch.Picture, 0, 0, Me.ScaleWidth, Me.ScaleHeight, 0, 0, ImageWidth, ImageHeight
      Set Me.Picture = picStretch.Image
      End Sub