问题
单项选择题
下列程序的输出图形是( )。 For k=0 To 360cr=Int(160*Rnd)ang=-3.1415926/180*kCircle(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