2013-06-19 07:43

'from beardyphish (7/13/03 1:59 pm)

'as I didn't want to have to use extra files I went searching for a way to make Windows do
'the sounds for me; the standard Windows sounds would do for the program I'm working on. What
'you need is an API call ofcourse; put these declarations at the start of the program

     DECLARE FUNCTION MessageBeep LIB "user32.dll" ALIAS _
      "MessageBeep" (BYVAL wType AS LONG) AS LONG

     DIM Retval AS LONG

'Then in the program use

     Retval = MessageBeep (305)

'where different values give different standard Windows sounds. I guess there must be a list
'for them, but I only needed this one

2013-06-19 07:43