VB动态时钟（源代码）

1、打开VB程序，新建一个工程

2、添加一个shape控件，一个timer控件、四个label控件和3个一端在同一点的line控件。shape控件的shape属性改为3，标签控件的caption分别是3、6、9、12并将其背景改为透明，timer控件的interval定为1000（1S变动一次)，line的颜色根据自己喜好

3、下面就是代码了，代码中的（1320，1200）是圆心，840、720、600是指针的半径，这可根据圆来自由更改。点击生成工程，动态时钟软件就制作完成了