[填空题] 在窗体上建立一个单选按钮组Option1和一个图片框Picture1,如图所示。当选择不同的单选按钮时,图片框中填充不同的图案,请填写程序的空白处,使程序完整。 Private Sub Optionl_Click(______) Dim H,W Picture1.Cls Picturc1.PillStyle=______ W=Picture1.ScaleWidth/2 H=Picture1.ScaleHeight/2 Picturc1.Circle(W,H),W/2 End Sub
正确答案:Index As Integer Index
参考解析:控件数组中的元素同享一个事件过程,过程有一个下标参数Index,用来区别数组中的不同控件,题目中单选按钮是控件数组,因此,它的Click事件过程带有参数Index的定义(Index As Integer);要求根据选择不同的单选按钮,来设置图片框的填充图案,图片框中的图案样式可以通过修改FillStyle属性值来实现,FillStyle的取值范围为0~7,题中用了7个单选按钮来表示每种图片框绘图的样式,因此第2个空应填写Index参数。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)