Dopo aver inserito nel pulsante il seguente codice
codice:
Dim aPath As String = Application.StartupPath()
tra le parentesi tonde devo inserire il nome della cartella, perchè se così fosse mi restituisce un messaggio d'errore