Intanto si dice PacMan (sono sempre più zanzaro!:quipy: ).
Io direi che non ti conviene creare un'immagine per ogni muro: il tuo computer, o quello di chi usa il tuo gioco, sarebbe carico in memoria!
Invece ti converrebbe creare una grande immagine di sfondo che rappresenta il paesaggio.
La correzione che devi fare è sostituire "And" con "Or".
Private Sub su()
sux = True
For k = 0 To 3
If Picture1.Top = matt(k).Top + matt(k).Height _
Or Picture1.Left >= matt(k).Left _
Or Form1.Width - Picture1.Left >= _
Form1.Width - (matt(k).Left + matt(k).Width) _
Then
sux = False
End If
Next k
End Sub

Ciao.