1

我做了一些研究并想出了这段代码。

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

我不知道为什么视频没有播放。我的 RSAppt.swf 文件位于我的项目下的资源（文件夹名称）文件夹中。是路径吗？将它定向到我的 .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 回答