微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题在VB4.0中利用VBPLAY.VBX播放动画
栏目软件大世界
作者高常华
发布1997-01-01
  用Autodesk公司的Animation player for Windows(简称AAWIN)可以在Windows下直接播放动画及背景音乐。同时,在Visual BASIC专业版中还有该公司提供的一个多媒体控件VBPLAY.VBX,有了这个控件,不用安装AAWIN同样可以播放wav、mid、avi、fli、flc等各种文件。使用时,只需将AAPLAY.DLL及VBPLAY.VBX直接拷贝到Windows的system子目录下,然后选Tools Custom Controls,将VBPLAY.VBX加入到工具箱(Toolbox)中,其外观是一个飞翔的小燕子。下面介绍播放动画及背景音乐的具体步骤。
  一、单击VBPLAY控件,在窗件上拖出一个动画播放框,并调整其大小。
  二、单击命令控件,在窗体上拖出三个命令按钮,其中
  Command1(第一个命令按钮的名字)
  Caption="Play"  ’播放按钮
  Command2(第二个命令按钮的名字)
  Caption="Stop"  ’停止播放按钮
  Command3(第三个命令按钮的名字)
  Caption="Pause"  ’暂停播放按钮
  三、双击Command1按钮,输入:
  Sub Command1-click()
  animation1.play=true  ’开始播放动画
  end Sub
  同理,双击Command2按钮,输入:
  Sub Command2-click()
  animation1.play=false  ’停止播放动画
  end Sub
  双击Command3按钮,输入:
  Sub Command3-click()
  animation1.Pause=true  ’暂停播放
  end Sub
  四、在form-load中输入:
  Sub from-load()
  animation1.Autoplay=false  ’关闭自动播放
  animation1.Sound="c:\windows\fand.mid"  ’指定背景音乐
  animation1.Animation="c:\3ds4\ltjh.fly"  ’指定动画文件
  end Sub
  五、按F5运行,
  单击Play按钮,则动画与音乐同时播放,利用这一技术,可以制作带解说的多媒体软件,例如教学片等。
  程序在486多媒体机上运行通过。