by Karthikeyan (187 Submissions)
Category: Windows API Call/Explanation
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Wed 1st August 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Play system sounds using MessageBeep API
API Declarations
Const MB_ICONEXCLAMATION = &H30 'SystemExclamation sound.
Const MB_ICONHAND = &H10 'SystemHand sound.
Const MB_ICONQUESTION = &H20 'SystemQuestion sound.
Const MB_OK = &H0 'SystemDefault sound.
Private Declare Function MessageBeep Lib "user32.dll" (ByVal wType As Long) As Long
' Play SystemQuestion sound.
Dim rval As Long
rval = MessageBeep(MB_ICONQUESTION)
End
End Sub