[RESOLVED] [VB6] - DIB's - Tiles an image

[LaVolpe]

1st - i use picGraphicsEffects.ScaleWidth and for the actual image size...

But you are not using it in your loop:

Not: If x >= picGraphicsEffects.Width Then Exit Do
But: If x >= picGraphicsEffects.ScaleWidth Then Exit Do

Same for .Height & .ScaleHeight. I think if you took the time to test what I suggested, you would have seen that:
X > picGraphicsEffects.ScaleWidth after your loop was done