Imports System.Runtime.InteropServices '引及Net框架中对底层操作支持的命名空间 Public Class Mainform Public Declare Function PlaySound Lib "CoreDLL.dll" (ByVal lpszSoundName As String, ByVal hModule As Integer, ByVal dwFlags As Integer) As Integer
Private Sub Test() PlaySound("\Storage Card\Program Files\Myproject\sound.wav", IntPtr.Zero, SND_ASYNC Or SND_FILENAME) End Sub