在窗体上建立一个单选钮组Option1和一个图片框Picture1，如下图

问题填空题

在窗体上建立一个单选钮组Option1和一个图片框Picture1，如下图所示。当选择不同的单选钮时，图片框中填充不同的图案，请填写程序的空白处，使程序完整。

Private Sub Option1_Click(______)
Dim H, W
Picture1.Cls
Picture1.FillStyle =______
W = Picture1.ScaleWidth/2
H = Picture1.ScaleHeight/2
Picture1.Circle (W, H), W/2
End Sub

答案

参考答案：Index As Integer Index

解析：控件数组中的元素同享一个事件过程，过程有一个下标参数Index，用来区别数组中的不同控件，题目中单选钮是控件数组。因此，它的Click事件过程带有参数Index的定义(Index As Integer)。题目中要求根据选择不同的单选钮，来设置图片框的填充图案，图片框中的图案样式可以修改FillStyle属性值来实现，FillStyle的取值范围为0～7，题目中用了7个单选钮来表示每种图片框绘图的样式，因此第2个空应填写Index参数。