Hola amigos. A ver si me podeis ayudar.
Tengo un pequeño código en Vb6. Es muy simple, se trata de colocar imágenes de una carpeta en un array de picturebox. La línea donde se insertan las imágenes es la siguiente:
Código:
Picture1(h).Picture = LoadPicture(FrmPrincipal.Archivo)
No sule haber ningún problema, pero a veces me da error: invalid picture. El caso es que no sé cómo gestionar el error, ya que si pongo:
Código:
If Err.Number=0 Then
Picture1(h).Picture = LoadPicture(FrmPrincipal.Archivo)
End If
no gestiona el error por estar antes de la línea que ejecuta el loadpicture.
Cómo podría resolver esto? Gracias por vuestras sugerencias.