マルチメディアコントロールの自動巻き戻し


トリッス  2003-10-30 16:46:36  No: 109602  IP: [192.*.*.*]

マルチメディアコントロール(MMControl)を使い,
Waveファイル再生のプログラムを作成しています。
再生,巻き戻し,停止のボタンだけ表示し,
開いたファイルが再生できましたが,
これを再生と停止ボタンだけにし,最後まで再生したら
自動で最初にもどるようにしたいと思います。
VB6(SP5)を使用しています。よろしくお願いします。

編集 削除
ねろ  2003-10-30 17:49:08  No: 109603  IP: [192.*.*.*]

これで何時まででもStopを押すまで、ぐるぐると
Private Sub MMControl1_Done(NotifyCode As Integer)
    If NotifyCode = 1 Then '
         MMControl1.Command = "Prev"
         MMControl1.Command = "Play"
    End If
End Sub

編集 削除
トリッス  2003-10-31 09:09:17  No: 109604  IP: [192.*.*.*]

ねろさん,ありがとうございました。
解決いたしました。

編集 削除