Guidance
指路人
g.yi.org
software / rapidq / examples / Audio & Video / PC Speaker Beep / NT Beep.bas

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

  
'From:  Chris <list@w...> Wed Oct 16, 2002  9:40 am
' How to BEEP with Windows NT4

'NT4, 2000, and XP do not allow direct accident to
'port 92 (not IP). You will need to use the aptly named API call BEEP.

'Begin BASIC
'Function Prototype (copy and paste into program)
     DECLARE FUNCTION Beep LIB "kernel32" ALIAS "Beep" (BYVAL dwFreq AS LONG, BYVAL dwDuration AS LONG) AS LONG
     Beep(500,300)
'?dwFreq
'Windows NT:
'Specifies the frequency, in hertz, of the sound. This parameter must be in the
'range 37 through 32,767 (0x25 through 0x7FFF).
'Windows 95:
'The parameter is ignored.
'?dwDuration
'Windows NT:
'Specifies the duration, in milliseconds, of the sound.
'Windows 95:
'The parameter is ignored.
'If the function succeeds, the return value is nonzero.
'If the function fails, the return value is zero. To get extended error
'information, call GetLastError.
'End BASIC
掌柜推荐
 
 
 
 
 
 
 
 
 
 
 
 
© Thu 2023-2-9  Guidance Laboratory Inc.
Email:webmaster1g.yi.org Hits:0 Last modified:2002-10-17 07:28:10