VB做电子报时钟(4)

模拟电子钟 带语音报时功能

格式: [对象.] Circle [ [ Step ] ( x , y ) ,半径 [ ,颜色 ] [ ,起始角度 ] [ ,终止角度 ] [ ,长短轴比率 ] ]

说明:

(1) 对象指的是Circle方法将在何处产生结果，它可以是窗体或图形框或打印机，缺省时为当前窗体。

(2)(x，y)为圆心坐标，关键字Step表示采用当前作图位置的相对值。

(3)圆弧和扇形通过参数的起始角度和终止角度控制。当起始角度和终止角度取值为0~360度时，画出来的是圆弧；当在起始角度和终止角度取值前加一个负号时，画出的是扇形，负号表示要画圆心到圆弧的径向线。

(4)椭圆通过长短轴比率控制，默认值为1，所以画出来的是圆。

下面我们用Circle方法分别画出圆形，椭圆，圆弧和扇形。下面是代码和图示：

Private Sub Form _ Click ( ) Circle(1500, 1500), 1000 End Sub

下图为画出的圆形：

Private Sub Form _ Click ( )

Circle(1500,1500),1000, ,0.7,2.1 ‘注意1000和0.7,中间是两个逗号 End Sub

下图为画出的圆弧：

Private Sub Form _ Click ( ) Circle(1500,1500) ,1000 , , -0.7,-2.1 End Sub

下图为画出的扇形：

Private Sub Form _ Click ( ) Circle(1500,1500),1000 , , , ,0.5 End Sub