Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As Any, ByVal uFlags As Long) As Long
Private Const SND_ASYNC = &H1
Private Const SND_MEMORY = &H4
Private Buff() As Byte
Private Sub Form_Load()
sndPlaySound Buff(0), SND_ASYNC Or SND_MEMORY
End Sub
Сейчас этот форум просматривают: Yandex-бот и гости: 160