1

私はいくつかの調査を行い、このコードを思いつきました。

    AxShockwaveFlash1.Stop()
    AxShockwaveFlash1.Movie = Application.StartupPath & "\RSAppt.swf"
    AxShockwaveFlash1.Play()
    playBtn.Enabled = False

動画が再生されない理由がわかりません。RSAppt.swf ファイルは、プロジェクトの下の resources(foldername) フォルダーにあります。パスですか？私の.swfファイルの特定のパスにそれを向ける正しい方法は何ですか. 何か案は？ありがとう！

4

2 に答える 2

2

これで問題なく動作するはずです。

Dim path As String = Application.Startuppath & "\yourfolder\yourfile.swf"

    AxShockwaveFlash1.LoadMovie(0, path)
    AxShockwaveFlash1.Play()
    AxShockwaveFlash1.Loop = False

ハッピーコーディング!!

于 2013-04-03T10:06:31.037 に答える
-1

次のものが必要です。

AxShockwaveFlash1.Show()
于 2014-03-19T10:40:37.717 に答える