Lotus и внешние библиотеки функций

null@example.com (admin) — Wed, 06 May 2015 08:08:13 +0000

Проигрывание файла "tada.wav" с помошью виндовой библиотеки winmm.dll, а именно её функции sndPlaySoundA.

Declare Function mySound Lib "winmm.dll" Alias "sndPlaySoundA" (Byval par1 As String, Byval par2 As Long) As Long 

Sub Click(Source As Button)
    Dim res
    Res = mySound("C:\WINDOWS\Media\tada.wav", 1) 
End Sub

Форум компьютерной помощи — Lotus и внешние библиотеки функций

Lotus и внешние библиотеки функций