Adobe公司Flash动画控件开发引起的问题

来源:互联网 发布:mac 多个全屏切换 编辑:程序博客网 时间:2024/05/18 20:11
        Flash.ocx是国际上著名的图像软件公司Adobe推出的swf格式动画播放控件,现在的最高版本11.0已不支持VB6的开发。 但,是不是完全不支持VB6的开发呢?也不是。下面2种情况需要引起程序员的高度重视:
        1、现有的VB工程源码文件如果是在低版本Flash.ocx下开发的,在高版本9.0以上环境下打开VB工程文件(是否9.0开始,需要测试一下),在保存的时候可以,但要小心Flash.ocx被替换成PictureBox控件。我曾经上过当,Flash.ocx和mswebdvd.dll控件均被替换成了PictureBox控件。所以,在保存VB工程的时候一定要检查Flash.ocx是否被替换成PictureBox控件?
        2、虽然高版本的(9.0以上)Flash.ocx不支持添加控件到窗体上(主要是保存不了VB工程),即不支持前期绑定Flash.ocx控件。但是,可以通过下面程序动态添加Flash.ocx控件到窗体上,即后期绑定Flash.ocx控件,VB工程可以保存下来,并编译成可以运行的exe程序:

       

Option ExplicitPrivate Sub Form_Load()    Dim FlashOBJ As Object        Set FlashOBJ = Me.Controls.Add("ShockwaveFlash.ShockwaveFlash", "Flash") '动态添加控件            FlashOBJ.Width = Me.Width     '设置外观    FlashOBJ.Height = Me.Height        FlashOBJ.Visible = True    FlashOBJ.object.LoadMovie 0, "D:\移动备份\歌曲\今天下载\爱很简单.swf"    End Sub


 

原创粉丝点击