Guidance
指路人
g.yi.org
software / rapidq / Examples / Audio & Video / PC Speaker Beep / speaker beep.bas

Register 
注册
Search 搜索
首页 
Home Home
Software
Upload

  
'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
掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Thu 2023-2-9  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0 Last modified:2013-06-19 07:43:04