select files from setup location vb

Question

I work on my VB application on visual studio 2012 I created a button, On clicking it, it plays a file on my PC ("D:\\My Project\\Sound_01.wav") so the code will be like that:

**Private Sub button1_Click(sender As Object, e As EventArgs) Handles button1.Click
    My.Computer.Audio.Play("D:\My Project\Sound_01.wav")

End Sub**

My problem is that I need to make setup file for that app (using install shield 2015) and the file location will return error because the destination PC may not have the same location("D:\\My Project\\Sound_01.wav")

can anyone advise me how to do that?

Answer 1

将文件添加到您的应用程序路径，以便可以使用以下命令：

  My.Computer.Audio.Play(Application.StartupPath & "\Sound_01.wav")