掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
VB.NET でMIDIOUTをOPENするには？ (ID：108088)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Windows2000にVisualBasic.NET Standardをインストールして３ヶ月の初心者です。MIDIデバイスを直接操作したくて見様見真似でこのようにしましたが、midiOutがオープンできなくてお手上げ状態です。 Private Declare Function midiOutOpen Lib "winmm.dll" (ByVal _ lphMidiOut As Long, ByVal uDeviceID As Long, ByVal dwCallback _ As Long, ByVal dwInstance As Long, ByVal dwFlags As Long) As Long Dim hMid As Long Dim ret As Long Private Sub Form1_Load(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles MyBase.Load ret = midiOutOpen(hMid, -1, 0, 0, 0) End Sub retには11が戻ります。 MIDIデバイスはソフトシンセとUSB対応のものを使っています。 midiOutGetNumDevs()では正常にデバイスの数を返してきます。 MCIでのMIDIファイル再生も問題なし。 市販のシーケンスソフトもでも問題ありません。 どうしてもretが0になってくれなくてお手上げ状態です。 何か根本的な見落としがあるのでしょうか。 よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.