４４．MIDI出力デバイスを閉じる



＜　使用用途　＞
MIDI を使用する時に用いる

＜　説明　＞
ＡＰＩ関数のMidiOutCloseを使用します。
MidiOutClose＝＞MIDIの出力デバイスを閉じる
　　＜引数＞
　　　 hMidiOut：出力デバイスのハンドル
　　＠戻り値＠　　
　　　　　　正常終了0以外

＊詳しいサンプルは「☆プログラムを作ってみよう」で掲載する予定です。

<　ＳＡＭＰＬＥ　＞
'ここではMIDIの出力デバイスを閉じる処理です
'標準モジュール
Public Declare Function midiOutClose Lib "winmm.dll" Alias "midiOutClose" (ByVal hMidiOut As Long)As Long

'ここからはフォームの処理
Private Sub Command1_Click()
　Dim Ret As Long　
　　　Ret=midiOutClose(Handle)
End Sub