Visual_Basic_清华大学vb编程语言基础_第8讲.pptVIP

SSTab控件-例 利用SSTab控件设计图书订购单 Private Sub SSTab1_Click(PreviousTab As Integer) If PreviousTab = 0 Or PreviousTab = 1 Then Text5 = Val(Text1) * 25 + Val(Text2) * 28 + Val(Text3) * 22 + Val(Text4) * 21 End If End Sub Animation控件 Animation 控件用来显示无声的视频动画，只能播放无声的视频文件（AVI 文件） Animation 控件位于Microsoft Windows Common Control-2 6.0部件中 Animation 控件的四个重要的方法： Open：打开 .avi 文件 Play： 进行播放 Stop：停止播放 Close：关闭该文件 Animation控件 Play 方法有三个参数 repeat：决定文件被播放多少遍 start：从哪一帧开始播放 stop：到哪一帧停止 如果没有提供 repeat 参数，文件将被连续播放 对象.Play [ 重复次数 , 起始帧 , 结束帧 ] Animation控件-例 设计播放无声.avi文件的程序 Private Sub Comm