试题七(15分钟)
阅读以下说明和Visual Basic代码,将应填入 __(n)__ 处的字名写在答题纸的对应栏内。
[说明]
某绘图系统定义了一个抽象类IShape, 现有三个类CPoint,CLine和CCircle,它们都具有IShape界面。相应的类图关系如图7-1所示。
已知某第三方库已经提供了XCircle类,且完全满足CCircle图元显示时所需的功能。化码7-1是抽象类IShape类模块内容,代码7-2实现了类CCircle的IShape界面,并使用了XCircle提供的显示功能。
XCircle提供的显示功能方法接口为displayIt。
[图7-1]
[代码7-1]
Public Color As Long
Sub draw()
'方法体不包括可执行语句
End Sub
Sub move(stepx As Single,stepy As Single)
'方法体不包括可执行语句
End Sub
[代码7-2]
__(1)__
Private color As Long
… '其他定义省略
Private ridged As __(2)__
Private Sub Class_Initialize()
Set bridged= __(3)__
End Sub
Private Property __(4)__ ()As Long
IShape_Color=color
End Property
Private Property __(5)__ (ByVal newColor As Long)
Color=newColor
End Property
Private Sub IShape_draw() '使用XCircle提供的显示功能
__(6)__
End Sub
Private Sub IShape_move (stepx As Single,stepy As Single)
… '省略描述
End Sub