AxWindowsMediaPlayer1.currentMedia.〜
AxWindowsMediaPlayer1.currentMedia.〜を調べてみましたが、ほとんど意味不明でした。初心者の私には 少々難解です。
メンバー名型名意味
attributeCountIntegerよくわかりません。
durationDouble演奏中の演奏時間が取得できます。 例 177.7894375
durationStringString演奏中の演奏時間が取得できます。 例 02:58
imageSourceHeightIntegerよくわかりません。 画像の高さかな〜?
imageSourceWidthIntegerよくわかりません。
isIdenticalBooleanよくわかりません。
markerCountIntegerよくわかりません。
nameString演奏中のアルバムタイトルです。
sourceURLString演奏中のファイルのフルパスです。

 

AxWindowsMediaPlayer1.currentMediaの使用例です。
Dim title As String   'タイトル
title = AxWindowsMediaPlayer1.currentMedia.name