hola me gustaría comprobar un icono existente dentro de la carpeta cualquiera valga pero que sea .ico y que muestre en una image o picture. Gracias.
así lo haría yo:
Private Sub Command1_Click()
If Len(Dir("C:\notelist.ico")) = 0 Then
Picture1.Picture = LoadPicture("C:\note.ico")
Else
MsgBox "no existe el icono en la carpeta"
End If
End Sub
y si hay mas de 1 icono como lo haria?
Cita de: AnaCarolina28 en 13 Noviembre 2014, 01:09 AM
y si hay mas de 1 icono como lo haria?
y tambien que no se sabe que nombre de icono tiene. porque los hay en muchas carpetas