VB设计动画时钟

1、如何修改时针的形状？通过调整代码中的属性设置，可以改变时钟的形状。例如：通过改变每一个Line控制的Borderwidth属性设置，可以建立更细或更粗的线。

3、新建工程先新建一个工程（工程类型为标准EXE），然后用“工具箱”中的工具加入一个Timer1（计时器）和line1（直线），其index（指针）分别设置为空和0。然后双击Form1窗体，输入源代码。

5、End IfFor I = 0 To 14Scale (-1, 1)-(1, -1)Angle = I * 2 * Atn(1) / 3Line1(I).X1 = 0.9 * Cos(Angle)Line1(I).Y1 = 0.9 * Sin(Angle)Line1(I).X2 = Cos(Angle)Line1(I).Y2 = Sin(Angle)Next IEnd Sub

7、程序的编译和执行点击VB“运行”菜单中的“启动”或“全面编译”命令，即可对程序编译并运行！注：上述程序在中文Windows98和VB5.0中文企业版下调试通过