求高手解决！

请安装flash的旧版本。

请教一下如何能让SWF档连续播放？怎算档案预计播放时间？

了解〜

楼主要的解答～
ShockwaveFlash控件有问题不能手动拉出来～要用动态拉～

Option Explicit

'新建工程,默认的窗体记得拉大一点~~~
Private Sub Form_Load()
Dim tmpCtl As Object
    
    Set tmpCtl = Me.Controls.Add("ShockwaveFlash.ShockwaveFlash", "Flash") '动态添加控件
    Set tmpCtl.Container = Frame1
    
    tmpCtl.Width = Frame1.Width     '设置外观
    tmpCtl.Height = Frame1.Height
    
    tmpCtl.Visible = True
    tmpCtl.object.LoadMovie 0, "http://comic."
    
End Sub

我的问题答案～SWF档不算秒数～算祯数～SWF档连播的代码还在写～玩玩而已～
代码直接复制到一个新工程～拉个Frame控件上去～就能运行～

[ 本帖最后由 wube 于 2011-6-14 19:21 编辑 ]

恩，我的也是， 工程文件 有 ShockwaveFlash  控件，就保存不了。但是能生成 .exe 程序 ，能带 flash的。  我电脑 安装了flash8.0  .