Creo que tu problema podriapodría deberse a que no haces Dispose
de las imagenesimágenes que no vuelves a usar.
Bajo esta premisa, y basandome en esta respuesta, deberias de hacer Dispose de las imagenes cada vez que actualizas el PictureBox
:
Private Sub Timer1_Tick(
...
var imagenNueva = Image.FromFile("C:\Users\Usuario\Desktop\Promo\" + lista(i))
var imagenVieja = PictureBox1.Image;
PictureBox1.Image = imagenNueva;
if(imagenVieja != null)
((IDisposable)imagenVieja).Dispose();
VB.net no es mi fuerte, por lo que ruego que me perdones si mi sintaxis es incorrecto.