问答题

试题七
阅读以下说明和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 bridged As _____(2)______

Private Sub Class_Initialize()
Seb bridged=____(3)_____
End Sub

Private Property ___(4)____()As Long
IShape_Color = color
End Property

Private Property____(5)_____(By Val 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