Ver Mensaje Individual
  #2 (permalink)  
Antiguo 24/06/2007, 14:55
astut
 
Fecha de Ingreso: septiembre-2005
Ubicación: Valencia
Mensajes: 738
Antigüedad: 19 años, 7 meses
Puntos: 5
Re: Preguntas varias

Hola, he hecho un array de objetos PictureBox, lo que quiero es, miren el siguiente codigo:
Código:
Private Sub Picture1_Click(Index As Integer)
    Picture1().Picture = LoadPicture("../terrenos/001.gif")
End Sub
Pretendo que esa funcion se repita para TODOS los picturebox, ya que puse 120, y poner esa funcion para los 120 picture pues como que no es rentable xD,
gracias y saludos
---------
Ya lo resolvi, es de la siguiente manera:
Código:
Private Sub Picture1_MouseUp(Index As Integer, Button As Integer, Shift As Integer, X As Single, Y As Single)
    picture_index = Index
End Sub

Private Sub Picture1_Click(Index As Integer)
    Picture1(picture_index).Picture = LoadPicture("../terrenos/" & Lst_terrenos.Text & ".gif")
End Sub
Con el primer sub detecto si el raton esta encima sobre algun picture y lo guarda, asi se antes de clikear, en que picture clikeare

Aun asi, necesito ayuda en el post de arriba, gracias

Última edición por astut; 24/06/2007 a las 15:22 Razón: resuelto