你好,欢迎访问远方教程PC版!
广告位招租
网站首页 >> 统计之窗 >> VB专区 >> 文章内容

VB应用举例07:在VB应用软件中实现动画效果(第1页)

[日期:2014-12-17]   来源:远方教程  作者:VBFans   阅读:5929次[字体: ] 访问[旧版]
 捐赠远方教程 

  在开发VB应用程序中,加入了动画之后可使软件具有生动活泼的效果,而且,在编写组态软件中,动画功能更是必不可少,如容器中容量的变化、液体液面的变化等,实际也是一种动画效果。在中科院空间中心开发的“电场和电导率监测网中心站专家系统”中,有多处使用动画效果,现简明介绍如下。

  一、使用Animation控件

  在VB中可以使用Animation控件实现动画,实例如下:

Private Sub Animation1_Click () 
With CommonDialog1 
.Filter = "avi (*.avi)|*.avi"’过滤器指定在对话框的文件列表框中显示文件的类型 
.ShowOpen          '显示“打开”对话框 
End With 
With Animation1 
.Autoplay = True             ’一旦将.avi文件加载到Animation 控件中,则.avi文件将连续循环的自动播放。 
.Open CommonDialog1.Filename ’打开一个将要播放的.avi文件。如果AutoPlay属性为True,则只要加载该文件便可。 
End With 
End Sub 

  Animation 控件不能播放含有声音数据的 .avi 文件。此外,动画控件只能显示未压缩的或用行程编码 (RLE) 压缩的 .avi 文件。当用文件调用 Open 方法时,如果该文件含有声音数据,或不具备特定的压缩格式,则返回错误。

图片展示
 
 
相关评论
站长推荐