下列程序的输出图形是( )。 For k=0 To 360 cr=Int(160*Rnd)ang=-3.1415926/180*k Circle(2000,2000),500,cr,0,ang Next

admin2013-04-11  22

问题 下列程序的输出图形是(    )。    For k=0 To 360        cr=Int(160*Rnd)ang=-3.1415926/180*k        Circle(2000,2000),500,cr,0,ang    Next

选项 A、一段彩色圆弧
B、一个彩色扇形
C、一个彩色空心圆
D、一个辐射状彩色圆形

答案D

解析 解本题主要是理解用Circle画圆弧的方法,它以弧度为单位,给出定义弧线start和end的角度参数。画圆弧的语法是:
[object.]circle[Step](x,y)radius,[color],start,end[,aspect]
题中,圆心不变,半径500不变,用变量cr表示颜色,是随机变化的,弧线终点也在变化,所以经过360次循环会画出一段辐射状彩色的圆形。
[知识拓展] 如果start参数或end参数是负数的话,Visual Basic将画一条连接圆心到负端点的线。例如,下面的过程将用消除切片方式画出一个饼。
Private Sub Form_Click()
Const PI=3.14159265
Circle (3500,1500),1000,,-PI/2,-PI/3
End Sub
转载请注明原文地址:https://jikaoti.com/ti/bUO0FFFM
0

最新回复(0)