请问高手怎样用VB编写一个简单的FLASH播放器(解决立马给分)??????

解决方案 »

  1.   

    首先,打开VB,新建一个工程,在工具箱上单击鼠标右键,选择部件(或菜单里的:工程/部件,再或:Ctrl+T)
    在部件窗口的控件列表中选择Shockwave Flash,然后确定,再Flash控件就被加到工具箱上了.然后将Flash控件放到窗体上,并调整至适当的大小,然后在属窗中设置Movie属性为Flash动画所在的路.双击窗体的load事件中加入下面的代码:shockwaveflash1.playing=true按F5就可以看到播放的Flash动画了.
      

  2.   

    我要选择一个FLASH文件 
    然后我点击播放 就开始播放
      

  3.   

    Private Sub Command1_Click()
    ShockwaveFlash1.Movie = Text1.Text
    ShockwaveFlash1.Play
    End Subtext1.text是播放文件地址!如果要用选择文件的,请使用commondialog控件选择文件
      

  4.   

    再给你贴一下commondialog的使用方法的控件吧!
    Private Sub Command2_Click()
    CommonDialog1.ShowOpen
    CommonDialog1.FileName = ""
    CommonDialog1.Filter = "FLASH文件|*.swf;*.exe"
    If CommonDialog1.FileName <> "" Then
    ShockwaveFlash1.Movie = CommonDialog1.FileName
    ShockwaveFlash1.Play
    End If
    End Sub
      

  5.   

    http://community.csdn.net/Expert/topic/2680/2680530.xml?temp=.6444361