Quando ti genera l'eccezione, ed il programma va in pause, verifica il valore di ComboBox1.text (selezioni con il mouse ComboBox1.text e poi premi SHIFT+F9).
Vedrai che probabilmente ti mostrerà solo il nome del file, ma senza il percorso.

Ovviamente il file senza percorso non può essere trovato, da qui l'eccezione, per cui devi 'combinare il percorso con il file:

codice:
Dim fileAudio as String = IO.Path.Combine(currentdir, ComboBox1.text)
Ma prima devi rendere visibile la variabile currentdir, che invece è dichiarata dentro il Button1_Click, ovvero devi dichiararla a livello di form e non di routine.