• Замечено: чем умнее становятся компьютеры, тем тупее становятся их пользователи.

Операции со звуками

Класс Sound позволяет проигрывать стандартные звуки Windows или звуковые файлы.

Воспроизведение звуковых файлов под MS Windows 10 может не работать!

Вы можете скопировать указанный ниже код программы в IDE MS Small Basic и запустить:

 

WINDOWS_MEDIA_PATH = "C:\Windows\Media\"

Sound.Play(WINDOWS_MEDIA_PATH + "tada.wav")

DelayProgram()

Sound.PlayAndWait(WINDOWS_MEDIA_PATH + "звон.wav")

DelayProgram()

Sound.PlayBellRing()

DelayProgram()

Sound.PlayBellRingAndWait()

DelayProgram()

Sound.PlayChime()

DelayProgram()

Sound.PlayChimeAndWait()

DelayProgram()

Sound.PlayChimes()

DelayProgram()

Sound.PlayChimesAndWait()

DelayProgram()

Sound.PlayClick()

DelayProgram()

Sound.PlayClickAndWait()

Sub DelayProgram

Program.Delay(2000)

EndSub


Поделиться: