请教：vba开发 实体的动态旋转怎么编程解决？急！！！
www.dimcax.com
请教：vba开发 实体的动态旋转怎么编程解决？急！！！
vb代码
我的毕业设计是螺旋锥齿轮的虚拟加工，需要用cad的vba开发来实现，我遇到一个麻烦：不会使一个实体绕一个轴匀速圆周旋转,而且需要看到动态效果。我想到用定时器，但不会用，知道三个方法可以实现：1、api回调函数，这个太难，看不懂；2、封装，上次得到一位大哥的帮助，发了个dll，但出错：“activex部件不能创建对象”；3、在vb中实现，我尝试过，但失败了，请好心人能帮小弟个忙啊，用后面两种方法实现！急啊，谢谢了！
我用第三种方法的程序上传给大家看下，看哪错了？