|
Buenas, lo que tendrías que hacer es:
Guardar el estado (si está seleccionado o no) por ejemplo con un text box:
y después:
Private sub Command1_Click()
if label1.caption = "Seleccionado" then
label1.Caption = "Deseleccionado"
picture1.image = ""
else
label1.Caption = "Seleccionado"
picture1.image = "C:\imagen.jpg"
end sub
Algo así podrías hacer
Espero haber sido de ayuda
Saludos
Andrés
|
