動画の再生時間を表示するには？

star01 2011-02-21 09:49:10 No: 102787

Visual BasicでWindows Medeia Playerの動画の再生時間を取得する方法を教えてください。
バージョンは2008です。
よろしくお願いします。