[填空題] 在窗體上建立一個單選鈕組Option1和一個圖片框Picture1，如下圖所示。當(dāng)選擇不同的單選鈕時，圖片框中填充不同的圖案，請?zhí)顚懗绦虻目瞻滋?，使程序完整?/p>

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

控件數(shù)組中的元素同享一個事件過程，過程有一個下標(biāo)參數(shù)Index，用來區(qū)別數(shù)組中的不同控件，題目中單選鈕是控件數(shù)組。因此，它的Click事件過程帶有參數(shù)Index的定義(Index As Integer)。題目中要求根據(jù)選擇不同的單選鈕，來設(shè)置圖片框的填充圖案，圖片框中的圖案樣式可以修改FillStyle屬性值來實(shí)現(xiàn)，F(xiàn)illStyle的取值范圍為0～7，題目中用了7個單選鈕來表示每種圖片框繪圖的樣式，因此第2個空應(yīng)填寫Index參數(shù)。