在VB4.0中利用VBPLAY.VBX播放动画

Author: 高常华 Date: 1997-01-01

　　用Ａｕｔｏｄｅｓｋ公司的Ａｎｉｍａｔｉｏｎ　ｐｌａｙｅｒ　ｆｏｒ　Ｗｉｎｄｏｗｓ（简称ＡＡＷＩＮ）可以在Ｗｉｎｄｏｗｓ下直接播放动画及背景音乐。同时，在Ｖｉｓｕａｌ　ＢＡＳＩＣ专业版中还有该公司提供的一个多媒体控件ＶＢＰＬＡＹ．ＶＢＸ，有了这个控件，不用安装ＡＡＷＩＮ同样可以播放ｗａｖ、ｍｉｄ、ａｖｉ、ｆｌｉ、ｆｌｃ等各种文件。使用时，只需将ＡＡＰＬＡＹ．ＤＬＬ及ＶＢＰＬＡＹ．ＶＢＸ直接拷贝到Ｗｉｎｄｏｗｓ的ｓｙｓｔｅｍ子目录下，然后选Ｔｏｏｌｓ　Ｃｕｓｔｏｍ　Ｃｏｎｔｒｏｌｓ，将ＶＢＰＬＡＹ．ＶＢＸ加入到工具箱（Ｔｏｏｌｂｏｘ）中，其外观是一个飞翔的小燕子。下面介绍播放动画及背景音乐的具体步骤。
#2　　一、单击ＶＢＰＬＡＹ控件，在窗件上拖出一个动画播放框，并调整其大小。
#2　　二、单击命令控件，在窗体上拖出三个命令按钮，其中
　　Ｃｏｍｍａｎｄ１（第一个命令按钮的名字）
　　Ｃａｐｔｉｏｎ＝＂Ｐｌａｙ＂　　　’播放按钮
　　Ｃｏｍｍａｎｄ２（第二个命令按钮的名字）
　　Ｃａｐｔｉｏｎ＝＂Ｓｔｏｐ＂　　　’停止播放按钮
　　Ｃｏｍｍａｎｄ３（第三个命令按钮的名字）
　　Ｃａｐｔｉｏｎ＝＂Ｐａｕｓｅ＂　　　’暂停播放按钮
#2　　三、双击Ｃｏｍｍａｎｄ１按钮，输入：
　　Ｓｕｂ　Ｃｏｍｍａｎｄ１－ｃｌｉｃｋ（）
　　ａｎｉｍａｔｉｏｎ１．ｐｌａｙ＝ｔｒｕｅ　　　’开始播放动画
　　ｅｎｄ　Ｓｕｂ
　　同理，双击Ｃｏｍｍａｎｄ２按钮，输入：
　　Ｓｕｂ　Ｃｏｍｍａｎｄ２－ｃｌｉｃｋ（）
　　ａｎｉｍａｔｉｏｎ１．ｐｌａｙ＝ｆａｌｓｅ　　　’停止播放动画
　　ｅｎｄ　Ｓｕｂ
　　双击Ｃｏｍｍａｎｄ３按钮，输入：
　　Ｓｕｂ　Ｃｏｍｍａｎｄ３－ｃｌｉｃｋ（）
　　ａｎｉｍａｔｉｏｎ１．Ｐａｕｓｅ＝ｔｒｕｅ　　　’暂停播放
　　ｅｎｄ　Ｓｕｂ
#2　　四、在ｆｏｒｍ－ｌｏａｄ中输入：
　　Ｓｕｂ　ｆｒｏｍ－ｌｏａｄ（）
　　ａｎｉｍａｔｉｏｎ１．Ａｕｔｏｐｌａｙ＝ｆａｌｓｅ　　　’关闭自动播放
　　ａｎｉｍａｔｉｏｎ１．Ｓｏｕｎｄ＝＂ｃ：＼ｗｉｎｄｏｗｓ＼ｆａｎｄ．ｍｉｄ＂　　　’指定背景音乐
　　ａｎｉｍａｔｉｏｎ１．Ａｎｉｍａｔｉｏｎ＝＂ｃ：＼３ｄｓ４＼ｌｔｊｈ．ｆｌｙ＂　　　’指定动画文件
　　ｅｎｄ　Ｓｕｂ
#2　　五、按Ｆ５运行，
　　单击Ｐｌａｙ按钮，则动画与音乐同时播放，利用这一技术，可以制作带解说的多媒体软件，例如教学片等。
　　程序在４８６多媒体机上运行通过。