在窗体中建立名称为command1的控件数组(index值分别为0,1,2和3),单击它时发生如下事件:Pri
15 查阅
在窗体中建立名称为command1的控件数组(index值分别为0,1,2和3),单击它时发生
如下事件:
PrivateSubCommand1_Click(IndexAsInteger)
Picture1.Cls
SelectCaseIndex
Case0
Picture1.Print"画直线"
Picture1.Line(2,2)-(7,7)
Case1
Picture1.Print"画矩形"
Picture1.Line(2,2)-(7,7),,BF
Case2
Picture1.Print"画圆"
Picture1.Circle(4.5, 4.5),3.5,,,,1.4
CaseElse
End
EndSelect
EndSub
当选择index=2的按钮时,在图片框picture1中显示( )
A."画直线"文字和一条直线
B."画矩形"文字和一个矩形
C."画圆"文字和一个椭圆
D.程序运行结束
参考答案: