Imagen de fondo en formulario

[NRLABS]

Private Sub Form_Paint()
Dim i As Integer
For i = 0 To frm10.ScaleHeight Step Picture1.Height
Dim j As Integer
For j = 0 To frm10.ScaleWidth Step Picture1.Width
PaintPicture Picture1, j, i, Picture1.Width, Picture1.Height
Next
Next
End Sub

Private Sub Form_Resize()
Picture1.Left = -(Picture1.Width + 200)
Picture1.Top = -(Picture1.Height + 200)

End Sub

es facil el comando picture 1 la copia tantas veces como sea necesario! donde dice frm10 cambialo por el nombre de tu form

saludos y avisame si te sirvio comoa mi
**