首页 >> 读书频道 >> 电脑 >> 用Visual Basic的Move方法实现动画效果
 
· VB实现图形动画的三种方
· 用Visual Basi
· 图像艺术清屏
· VB剪贴板的用法
· 避免按 [ENTER]
· 如何结束 Shell 所
· Shell & Wait
· 监视程序的运行情况
· VB应用小集-&
· VB中访问API函数之防
· API函数在VB开发中的
· 如何设计一个可中断循环的
 
· 电视剧《刁蛮公主》下载和
· 美容养颜手册
· 加油金顺剧情分集介绍完整
· 红楼梦:120回全本[清
· 素质教育在美国
· 全唐诗卷四十六
· 韩剧《布拉格恋人》剧情介
· 夜航船[作者:明·张岱]
· 局外人[作者:韩·可爱淘
· 现场流行病学
· 源氏物语[日本:紫式部]
· 武林寓言故事
 
· (出租)中动商场部分及写
· (出租)中动动漫基地&#
· 喜剧学院
· 《善德女王》剧情介绍
· 魔女18号 剧情
· 丑女无敌剧情介绍
· 魔女幼熙剧情介绍
· 龙游天下剧情介绍
· 震撼世界的七日剧情介绍
· 静静的白桦林剧情介绍
· 心情日记—老公今天我想对
· 旗舰剧情介绍
欢迎来到月影社区!如果您觉得这里不错,请推荐给您的朋友们。月影社区:http://wf66.com/

用Visual Basic的Move方法实现动画效果


查看有无更新版本

关键字:VB 2006-9-20

 

    Visual Basic和结构化程序相比,增加了对象的“方法”功能。充分掌握这种不同于对象属性的“方法”,对可视化应用的开发极为重要。下面,以VB4.0的move方法为例,说明该方法在动画中的应用。
    本例欲通过move方法完成一只蝴蝶的飞翔过程。通过定时器的中断,每隔一定时间(本例为0.2秒),在屏幕上移动蝴蝶的位置,并且改变蝴蝶的形态(展翅和收翅),于是利用视觉的暂存效应,看到蝴蝶栩栩如生的飞行场面。蝴蝶的位置的移动就由move方法来实现,move方法使用的格式如下:
    对象. move left, top
    其中left为对象左边界的水平坐标(x轴),top为对象上边界的垂直坐标(Y轴),本例中的对象框(image box),名字为main。
    蝴蝶的展翅和收翅图象由位图文件bfly1.bmp bfly2.bmp来提供,并可根据需要制作其它飞行的位图文件,以使效果更加逼真。
    本例中窗体结构和各个对象的属性设置如下:

      
        对象
        属性设置
      
      
        窗体caption
        蝴蝶飞行动画设计
      
      
        图象框 name
        main
      
      
        picture
        bfly1
      
      
        图象框 name
        openwings
      
      
        picture
        bfly1
      
      
        图象框 name
        closewings
      
      
        picture
        bfly2
      
      
        命令框 name
        command1
      
      
        caption
        E&xit
      
      
        定时器 name
        timer1
      
      
        interval
        200
      
    
    


    有关程序比较简单,代码如下:
    定时器中断程序:
Private SubTimer-Timer()
Static PickBmp As Integer
Main.Move Main.Left +20,Main.Top -5
If PickBmp Then
Main.Picture =Open Wings.Picture’Displays the open butterfly picture.
Else
Main.Picture =Close Wings.Picture’Displays the closed butterfly picture.
End If
PickBmp=Not PickBmp’Toggle the value.
End Sub
    退出按钮(exit)程序:
Private Sub Command1-Click()
Unload Me
End
End Sub
    这样,利用VB的move方法和其它对象属性,就可以实现更加复杂的动画设计。

用Visual Basic的Move方法实现动画效果

[ 1 ]
用Visual Basic的Move方法实现动画效果 num

打印本页 关闭

关于我们版权声明本站导航友情连结作品演示 TOP↑