同时显示消息框和声音 - VBA

同时显示消息框和声音 - VBA

在下面的代码中,首先播放歌曲,然后显示消息。如何显示消息框声音播放 同时地在下面的代码中?

Private Declare PtrSafe Function PlaySound Lib "winmm.dll" _
Alias "PlaySoundA" (ByVal lpszName As String, ByVal hModule As LongPtr, ByVal 
dwFlags As Long) As Boolean

Private Sub CommandButton1_Click()
   Call PlaySound("c:\windows\media\tada.wav", 0, SND_ASYNC Or SND_FILENAME)
   Msgbox "Process completed successfully."
End Sub

相关内容