水平运动类振动筛要求开动时会水平地来回运动，属于水平运动方式。先用图像编辑软件画出振动筛的形状，保存成文件，然后在窗体上设置一个PictureBox，装入的图像文件，把它的名称设置成振动筛，要求程序中设置振动筛位置和振动筛开关为全局变量，存储振动筛的水平位置和开关情况。振动筛从初始位置向右移动，到达右边界后则向左移动，回到初始位置后又向右移动，如此反复表示振动的效果。振动筛。Left是振动筛左端与窗体左端的距离。将以下子程序放入动画计时器的TIMER事件中，即可实现振动筛的动画。旋转运动类泵类和皮带机都属于旋转运动，其中泵开动时叶轮都会按顺时针方向转动，而皮带机根据放置的位置不同，在开动时两边的皮带轮可顺时针方向或逆时针方向转动，其转动的图像表示方式略有差别，以下分别讨论。用程序计算出叶轮的位置和大小，实现叶轮的转动。程序中要求设置结构型数组泵数组为全局数组，存储叶轮的角度、运转情况。将程序放入动画计时器的TIMER事件中，即可实现泵运转的动画。为使动画看起来较为平滑和真实，每次变化的角度采用10°。当泵运转时，程序先画出一个黑色的圆盘，再在黑色的圆盘上画出两个对称的90°白色扇形，就组成了黑白相间的叶轮，并不停地转动。在Visual Basic中，绘制弧线时，如果起始角与终止角均为正值时，则只画出圆弧；若二者皆为负值时，则会在起始点和圆心与终止点和圆心间画出半径，与画出的弧线构成一个扇形。故在以上程序中将转角换算成负值，以便于画出扇形和填充颜色。