extern static Int32 midiStreamClose(IntPtr hMidiStream);
Public Declare Function midiStreamClose Lib "winmm.dll" (ByVal hMidiStream As IntPtr) As Integer