Nabídka portálu se při zobrazení článku přesouvá na konec pravého sloupce nabídek.
 Pípnutí o zvolené délce a výšce tónu ve VBasicu. |
Autor: Kočí Marek
| Zdroj:
| Vytvořeno: 11.2.2004
| Publikováno: 11.2.2004
| Čtenářů: 3346
| Unikátních: 3261
|
Potřebujete pípnout ve Visual Basicu, a Beep vám nestačí?, řešení je jednoduché, jde to pomocí API funkce.
Jednoduchý kód nepotřebuje určitě komentář :)
Private Declare Function Beep Lib "kernel32" _
(ByVal dwFreq As Long, ByVal dwDuration As Long) As Long
Private Sub Zahraj()
Dim lngCnt As Long
For lngCnt = 1000 To 6000 Step 100
Beep lngCnt, 20
DoEvents
Next lngCnt
End Sub
|
Novinky e-mailem
Nejčtenější články
Anketa
Nabídka portálu