vb6.0如何調出人聲

#If Win32 Then

Public Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long

#Else

Public Declare Function sndPlaySound% Lib "mmsystem.dll" (ByVal lpszSoundName As String, ByVal uFlags As Integer)

#End If 'WIN32

下面是播放C:\windows\media\tada.wav的方法，只要換成妳的錄音就行：

sndPlaySound “C:\windows\media\tada.wav”, 1 '=0等待播放結束，=1可以繼續