ShockwaveFlash1

我在VB的窗里加载了一个ShockwaveFlash1,但是我不知道怎么找到 swf 文件，请帮帮我 --------------------编程问答--------------------

Option Explicit



Private Sub Form_Load()

        ShockwaveFlash1.Movie = "E:\下载歌曲\今天下载\爱我的人和我爱的人.swf"

        ShockwaveFlash1.IsPlaying

        ShockwaveFlash1.AllowFullScreen = True

        ShockwaveFlash1.Playing = True

End Sub

--------------------编程问答-------------------- 楼主是要做一个VB版的Flash播放器吗？
主要就是对ShockwaveFlash的Movie属性赋值。建议通用相对路径，利用App.path可得到程序的目录。

补充：VB ,  数据库(包含打印，安装，报表)