标题在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多媒体机上运行通过。