当前位置:编程学习 > VB >>

关于VB中怎么让flash播放器的一个功能实现

我有一个想法就是让adobeFlashPlayer中的(文件-创建播放器)用VB实现,当然我已经用VB做好了一个flash播放器.
请告诉我要怎么做?
答案:
在VB中使用Flash4自带的Swflash.ocx控件就可以了。方法如下: 
   首先,打开VB6,新建一个工程, 在工具箱上单击右键,选择部件,在部件窗口的控件列表中选择Shockwave flash,然后确定,Flash控件就被加到工具箱上。
   然后将Flash控件放到窗体上,并调整至适当的大小,然后在属性窗口里设置movie属性为Flas易做图文件的路径(如:c:\demo.swf),设置scale model属性为2,quality 属性为 1。
   双击窗体,在form_load( )过程里加入:
   shockwaveflash1.playing=true
   按F5就可以看到播放的Flas易做图了。(注意:编译以后的可执行文件不包含动画文件)如果动画里加上动态按钮,配合鼠标位置判断,就可以作成动态工具条或动态菜单了。
VB与Flash联合打造你的魅力程序
(一) 在VB中播放Flas易做图

怎样才能在VB中加入Flas易做图呢?我们只要使用Flash5自带的Shockwave Flash.ocx这个控件就可以了。方法如下:

1. 打开VB6.0,新建一个工程,在工具箱上单击右键,选择Components…,在部件窗口的控件列表中选择Shockwave flash,然后确定,Flash控件就被加到工具箱上。

2.选择工具箱上的Flash控件,放到窗体上并调整好大小;

3.在Form_Load()过程中加入如下代码:

Private Sub Form_Load()

ShockwaveFlash1.Movie = “D:\test.swf”

'这里写上你的Flash文件目录

ShockwaveFlash1.Menu = False

ShockwaveFlash1.Playing = True

End Sub

其中,ShockwaveFlash1.Movie是用来指定你要播放的Flas易做图的目录;ShockwaveFlash1.Menu是用来指定是否在Flas易做图播放中封闭右键菜单,True为能够显示菜单,False为封闭右键菜单;ShockwaveFlash1.Playing = True是让动画播放。

好了,按F5看看吧

(二) 在Flash中控制VB程序实现交互,首先我们先来了解Flash中控制VB程序的基本原理:在Flash的ActionScript里面有个叫做FSCommand()的函数,它的主要功能就是发送FScommand命令,例如使动画全屏播放,隐藏动画菜单,更重要的就是可以与外部文件和程序进行通信。而在VB程序中,我们就是利用的Shockwave flash控件的FSCommand()过程来完成这一通信过程,实现信息发送的功能,并且根据发送出来的不同的命令及参数来实现对VB程序的控制。
简单的说,我们就是利用Flash中的FSCommand()函数向VB发送命令,利用Shockwave Flash控件来接受这个命令,从而达到Flash控制VB程序的目的。

1. 首先要打开Flash5制作一个交互按钮,并在按钮上面加上如下代码:

on (release) {
fscommand ("Send Action");
//发送Send Action这个命令

}

这个命令的作用是当按下按钮后Flash向VB发送出名为”Send Action”的命令。当然,这个命令的名字在实际应用中可以叫做其他的任何名字。
2. 将Flash导出成为swf文件,如文章第一部分所述插入到VB6.0中,下面就是VB怎么接受这个命令的事情了;
3. 在窗体上双击Shockwave Flash控件,进入代码编辑窗口,加入如下语句
其中,ShockwaveFlash1_FSCommand这个过程是专门用来接收Flash发送的FSCommand命令的,其中第一个参数command就是与Flash发送过来的命令相对应的,当其一致的时候,则执行后面的程序(本例中是弹出MsgBox)。好了,看看程序运行的结果吧:
Private Sub ShockwaveFlash1_FSCommand(ByVal command As String, ByVal args As String)
If command = "Send Action" Then
msg = MsgBox("Flash与VB成功结合了!", vbApplicationModal, "成功了!")
'当接到Send Action命令的时候
'这里加入你需要的程序
End If
End Sub
使用标准的flash播放器多好啊,这些功能都自带了,只需要调用即可。
没太明白 问题的意思,在vb里面直接调用flash的控件不就行了么,要是版本太低没有的话,到网上下载一个vb用的flash控件呗,感觉不会很复杂的
 
基于VB.NET多媒体Flash播放器的实现是小柯论文网通过网络搜集,并由本站工作人员整理后发布的,基于VB.NET多媒体Flash播放器的实现是篇质量较高的学术论文,供本站访问者学习和学术交流参考之用,不可用于其他商业目的,基于VB.NET多媒体Flash播放器的实现的论文版权归原作者所有,因网络整理,有些文章作者不详,敬请谅解,如需转摘,请注明出处小柯论文网,如果此论文无法满足您的论文要求,您可以申请本站帮您易做图,以下是正文。
  [摘要]多媒体设计是一门集计算机技术和数字多媒体技术于一体的综合设计。Visual Basic.NET是下一代的Visual Basic,Visual Basic.net是Microsoft公司开发的新一代窗体编程工具软件,由于它具有先进的设计思想,使之成为多媒体应用程序开发的理想工具,其提供的Flash控件是多媒体控制接口,利用这个接口跳过硬件访问并调用本地的符合其规格的多媒体解码驱动,进而实现Flash文件的播放。
  [关键词]多媒体 VB.net Flash控件
  
  一、引言
  
  在当今信息社会,以多媒体为特征的信息技术和信息产业的发展及应用对人类社会产生的影响和作用愈来愈明显,愈来愈重要。多媒体开发用到的媒体不再局限于传统程序设计用到的数值、文本,还包括图形、图像、声音和动画等媒体,其所涉及的信息范围和空间大为扩展。其次,多媒体开发将使用户不再仅仅被动地接受信息,而且可以主动地参与到整个信息交流过程中去。它向用户提供更加有效的控制和使用信息的手段及方法,同时也为应用开辟了更加广阔的领域。多媒体开发可做到让用户自由地控制和干预信息的处理,增加对信息的注意力和理解,延长信息的保留时间。再次,在多媒体开发过程中不仅要集成多媒体信息,还要集成与之有关的工具和设备。多媒体开发要使各种信息媒体成为一个有机的整体,以便实现信息的充分共享和操作。
  Visual Basic.NET是下一代的Visual Basic,是Microsoft公司开发的Windows编程工具软件,Visual Basic.NET现在完全集成在其它的Microsoft Visual Studio .NET语言中,由于它具有先进的设计思想、快速易掌握的使用方法及易做图体对象手段灵活多样等特点,受到了多媒体软件开发人员的关注和青睐,也因此成为多媒体应用程序开发的理想工具,以下为具体设计实现过程。
  
  二、信息界面的设计与实现
  
  首先为窗体添加一个panel控件,再在该控件上添加flash控件ShockWaveFlash,设置panel和flash控件的dock属性都为fill。为实现全屏显示做准备。然后,再为其添加一个菜单资源和状态栏。一个菜单系统(打开,播放,退出,全屏,显示播放状态信息),为实现从文件打开flash文件,需要给窗体添加一个openfiledialog控件,为了实现显示播放进度,需要一个timer控件实现计时功能。该内容将在状态栏中显示。在应用程序窗体中添加一个Flash控件后就可以通过它来打操作Flash文件。在实现过程中,会遇到一个新问题:如何实现和关闭全屏显示,为了解决这个问题,可以通过以下几个方面来实现:(1)将ShockWaveFlash控件的dock属性设为Fill。(2)由于ShockWaveFlash没有边界,需要添加一个panel控件,可以实现边框的效果。(3)设置好属性后,就是要实现全屏,执行特定代码,首先要设置窗体的

上一个:如何用vb语句表达:”所以我要学电脑科学。“?
下一个:vb代码:一个方法可将数字金额变为大写

CopyRight © 2022 站长资源库 编程知识问答 zzzyk.com All Rights Reserved
部分文章来自网络,