module1.vb

来自「这是一本用Visual Studio.NET进行多媒体编程的读物」· VB 代码 · 共 11 行

Option Strict Off
Option Explicit On
Module Module1
	Public Declare Function sndPlaySound Lib "winmm.dll"  Alias "sndPlaySoundA"(ByVal lpszSoundName As String, ByVal uFlags As Integer) As Integer
	
	Public Const SND_SYNC As Short = &H0s
	Public Const SND_ASYNC As Short = &H1s
	Public Const SND_NODEFAULT As Short = &H2s
	Public Const SND_LOOP As Short = &H8s
	Public Const SND_NOSTOP As Short = &H10s
End Module