Prosedur Beep

Prosedur Beep merupakan suatu prosedur yang digunakan untuk memutar suara beep secara langsung. Biasanya prosedur ini digunakan untuk mempertegas sebuah informasi yang ditampilkan. Berikut ini adalah varian dari Prosedur Beep yang bisa Anda gunakan :

1. Beep Standar
Beep ini adalah beep standar yang sudah menjadi bawaan VB.

Beep

2. Beep Internal
Beep ini menggunakan speaker internal yang biasanya terdapat dalam CPU. Beep ini dapat diatur frekuensi dan durasinya.

[ VB 6.0 ]
Di bagian '(Declarations)' dari form ketikkan :

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

Untuk menggunakannya ketikkan :

cBeep 1000, 100

[ VB .NET ]

System.Console.Beep(1000, 100)

3. Beep MsgBox
Beep ini merupakan beep yang sama ketika sebuah MessageBox (MsgBox) / kotak pesan muncul. Buat sebuah Module dan ketikkan :

Public Declare Function MessageBeep Lib "user32.dll" (ByVal wType As Integer) As Integer

Misalnya Anda ingin menggunakan beep seperti di MsgBox tipe Information, maka ketiikkan :

MessageBeep vbInformation