ر زیر برای شما تکه کدی را می گذارم که به وسیله آن شما می توانید تکه فایل صوتی را در برنامه پخش کنید تکه کد : Private Declare Function sndPlaySound Lib “winmm” Alias “sndPlaySoundA” (ByVal FileName As String, ByVal uFlags As Long) As Long Private Sub Command1_Click() sndPlaySound App.Path & “\exit.wav“, 0 End Sub در کد بالا app.path همان پوشه ای است که برنامه از آنجا اجرا می شود و exit.wav نام فایل صوتی مورد نظر است کد های Private Declare Function… یک api از api های ویندوز است. این برنامه در ویژوال بیسیک ۶ نوشته شده است و نیاز به یک دکمه دارد با نام Command1 .