掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
MMControlのNotifyプロパティを使って連続再生するには？ (ID：104434)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
はじめて書かせていただきます。 まったくの初心者なのでよろしくお願いします。 MMControlを用いて、MIDIファイルの連続再生をさせようとしています。 Private Sub MMControl1_Done(mciSuccessful As Integer) (途中略) MMControl1.FileName = "C:\xxx\xxx\& Level & ".mid" MMControl1.Command = "Open" MMControl1.Notify = True MMControl1.Command = "Play" End Sub という形で、一定条件を満たすと変数Levelの値が増え、 曲再生が最後まで終わったら次にLevel.midを再生する (レベルがそのままなら同じ曲を、レベルが上がったなら別の曲を再生する) というスクリプトを書いてみたのですが、 Levelが増えていたときは問題なく再生されるのですが、 同じ曲を再生させたい時に、無限ループに突入してしまいます。 調べてみたところ、同じ曲を一度再生させているのですが、 すぐになぜか停止してしまい再びMMControl1_Doneに入ってしまう、 ということになっているようです。 Load時の最初の曲再生と、このMMControl1_Doneの関数以外では MMControlは全くいじっていません。 どこを直せばいいのか全く見当がつきません。 御指導をよろしくお願いします！
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.