Pregunta de VB: ¿Cómo puedo optimizar este programa usando bucles?
Los nombres predeterminados para los controles PictureBox son Imagen1, Imagen2..., no PictureBox. ¿Hay algún problema con el código que proporcionaste en lugar de PictureBox?
Si el código y la configuración de control que proporciona son correctos, no habrá nada de malo en utilizar la siguiente declaración.
Para i = 0 a 10
Establezca CallByName(Yo, "PictureBox" & i, VbGet).Picture = Nothing
Siguiente
La causa del error no radica en esta afirmación, sino en la configuración del control. Por ejemplo, cámbielo a:
For i = 1 To 10
Set CallByName(Me, "PictureBox" & i, VbGet).Picture = Nothing
Siguiente
Para i = 1 a 10
Establezca CallByName(Me, "Picture" & i, VbGet).Picture = Nothing
Siguiente
Para i = 1 a 10
Establezca CallByName(Me, "Picture" & i, VbGet).Picture = Nothing