Home » Windows API

Beep

[ 日期： | 瀏覽：4,273 | 迴響：搶沙發 ]

說明：
Beep 函式可透過PC喇叭發出指定的聲音

引用函式庫：
Kernel32

適用系統：
Windows NT 3.1 或 Windows 95以上

函式原型：

Declare Function Beep Lib "kernel32" Alias "Beep" ( _
	ByVal dwFreq As Long, _
    ByVal dwDuration As Long _
    ) As Long



參數型態及說明：
dwFreq：Long 指定聲音的頻率，參數值介於37~32767(0x25~0x7FFF)
dwDuration：Long 聲音持續的時間，單位為毫秒

回傳值：
Long 呼叫成功的話，將會回傳非零的數值；若呼叫失敗的話，則回傳 0

.NET Framework API：
無

VB範例：

檢視原始碼 Visual Basic
1
2
3
4
5
6
7
8
9
10

'VB的宣告
Private Declare Function Beep Lib "kernel32" ( _
	ByVal dwFreq As Long, _
	ByVal dwDuration As Long _
	) As Long
 
Dim rtvl As Long
 
'發出聲音,持續100毫秒
rtvl = Beep(1000, 100)

RB範例：

檢視原始碼 REALBasic
1
2
3
4
5
6
7
8
9
10

'RB的宣告
Declare Function Beep Lib "kernel32" ( _
	dwFreq As Integer, _
	dwDuration As Integer _
	) As Boolean
 
Dim rtvl As Boolean
 
'發出聲音,持續100毫秒
rtvl = Beep(1000, 100)

VB.NET範例：

檢視原始碼 VB.NET
1
2
3
4
5
6
7
8
9
10
11
12

'VB.NET的宣告
<DllImport("kernel32.dll")> _
Shared Function Beep( _
	ByVal dwFreq As UInteger, _
	ByVal dwDuration As UInteger _
	) As Boolean
End Function
 
Dim rtvl As Boolean
 
'發出聲音,持續100毫秒
rtvl = Beep(1000, 100)

C#範例：

檢視原始碼 C#
1
2
3
4
5
6
7
8
9
10
11

//C#的宣告
[DllImport("kernel32")]
public static extern bool Beep(
	uint dwFreq, 
	uint dwDuration
	);
 
bool rtvl;
 
//發出聲音,持續100毫秒
rtvl = Beep(1000, 100);

註釋：
在Windows Me/98/95中會忽略Beep 函式中的兩個參數，因此聲音的頻率都不會變。另外，若有興趣的話，可用Beep 函式來彈出音樂喔！

發表迴響