在窗体中拖入一个Picture控件，一个定时器控件（Interval属性设置为100或200ms）。
以下是初一信息技术书本上的代码（它有1.jpg~30.jpg共30个动画图片文件若文件数不同则需相应修改程序中的“30”这个数字），这些图片文件需放在VB工程文件所在的同一个文件夹内：
