https://barnamenevis.org/showpo...5&postcount=56

Imports System.Media

Dim player As Media.SoundPlayer = New SoundPlayer()
Dim path As String = "C:\windows\media\ding.wav"
player.SoundLocation = path ' //Set the path
player.Play() ' //play it