WebBrowserコントロール内のボタンでWindowsMediaPlayerを制御するには？

BOOKS  2003-11-29 20:50:55  No: 80639  IP: [192.*.*.*]

先日の質問(FormのWebBrowserの動画リンクを同Form上のWindowsMediaPlayerで再生するには？)でWebBrowserからのWMPの再生法がわかりました。
WebBrowserに配置した再生ボタンや停止ボタンでWMPコントロールを制御するにはどうすればよいのでしょうか？
サンプルプログラムで
Private Function hDoc_onclick() As Boolean
Dim hAnchor As HTMLAnchorElement
Set hAnchor = hDoc.activeElement
If UCase(Right(hAnchor.href, 4)) = ".AVI" Then
    WMP.URL = "c:\winnt\clock.avi"
End If
End Function
の中にDim hButton As HTMLButton
のようなものを追加してWMP_start()のような事をすればよいのでしょうか？
HTMLButtonなどの説明が探しても見つからずわかりません。
何度も申し訳ありませんがどうかよろしくお願いいたします。

編集 削除
k.k  2003-11-30 17:53:56  No: 80640  IP: [192.*.*.*]

MediaPlayer1.Controls.play
MediaPlayer1.Controls.pause
MediaPlayer1.Controls.stop
でできると思います。

編集 削除