投稿者 KEN  (小学生) 投稿日時 2009/10/11 05:29:27
マルチメディア自由自在! 高レベルMCIを使う
を読んでもわからなかったのでおたずねします。


再生・停止は出来ました。
しかし、一時停止はできません。

     Call mciSendString("pause """ & FileName & """", "", 0, 0)
        Button2.Text = "再開"
        Label1.Text = FileName & "を一時停止しました"
「一時停止」というボタンには上のようなコードを追加して、
        If Button2.Text = "再開" Then

            Call mciSendString("resume " & FileName & """", "", 0, 0)


            Me.Button2.Text = "再生"
                'ここになにを入れるのかわかりません               
        Else

            Call mciSendString("play """ & FileName & """", "", 0, 0)


            Label1.Text = FileName & "を再生中"
        End If
このように「再生」(再開)ボタンを作りました。

「一時停止」を押すと、音楽が停止して「再生」というボタンが「再開」にはなるのですが、その後がわかりません。

マルチメディア自由自在! 高レベルMCIを使う
では

            Call mciSendString("resume " & FileName & """", "", 0, 0)


このようになっていました。

「再開」ボタンを押しても、「再開」が「再生」になるだけで、音楽が再開されません。

どうすれば再開してくれるでしょうか?