VB 图象多媒体动画效果 演示程序
ADDPIXONCE最小值为8,应设置为8的倍数
其值约大,显示的速度约快,时间约短
NowEffect = 0
‘请在这里按代码加入你要显示的图片
‘建议图片大小800×600左右
如果仅仅观看显示效果，建议使用原来的图片
由NowEffect选择应有的功能函数
0为Wipe Down（从上往下滑入）
1为Wipe Right（从左往右滑入）
2为Push Down（从上往下推入）
3为Push Right（从左往右推入）
4为Door Close（关门）
5为Book Open（打开书本）
6为Mirror（镜像）
7为Column（水平百叶窗方式）
8为Row（垂直百叶窗方式 ）
