VBで動画を再生するには への返答
投稿で使用できる特殊コードの説明。(別タブで開きます。)
以下の返答は逆順(新しい順)に並んでいます。
投稿者 brv (中学生)
投稿日時
2009/10/11 01:40:47
こんなのでどうでしょう。
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'※AxWindowsMediaPlayer1はActiveXのWMPコントロール
Dim filePath As String = "" 'この変数にパスが入ってることを前提とする
Select Case IO.Path.GetExtension(filePath)
Case ".avi", ".wmv"
AxWindowsMediaPlayer1.URL = filePath
Case Else
MessageBox.Show(filePath & "が開かれました")
End Select
End Sub
投稿者 KEN (小学生)
投稿日時
2009/10/11 01:00:39
>Loadイベントで指定した".Wmv”か".avi"を再生する
というのは、VideoPlay.VbのLoadイベントで".Wmv”か".avi"を再生するということです。
というのは、VideoPlay.VbのLoadイベントで".Wmv”か".avi"を再生するということです。
投稿者 KEN (小学生)
投稿日時
2009/10/11 00:59:40
VBのバージョンは2008です。
投稿者 KEN (小学生)
投稿日時
2009/10/10 20:33:46
以前
「簡単なMP3プレーヤーを作っています」
というものを質問しましたが、
ファイルを選択した際、
拡張子が".wmv"や".avi"だった場合、
AxWindowsMediaPlayerが配置してあるVideoPlay.vbを開いて、Loadイベントで指定した".Wmv”か".avi"を再生する
というふうにしたいのですが、どうしたらいいのでしょうか？
「簡単なMP3プレーヤーを作っています」
というものを質問しましたが、
ファイルを選択した際、
拡張子が".wmv"や".avi"だった場合、
AxWindowsMediaPlayerが配置してあるVideoPlay.vbを開いて、Loadイベントで指定した".Wmv”か".avi"を再生する
というふうにしたいのですが、どうしたらいいのでしょうか？
ありがとうございました。