填空题

在窗体上先画一个名为Text1的文本框和—个名为Label1的标签，再画—个名为Op1的有4个单选按钮的单选按钮选项组，其Index属性按季度顺序为0～3(见图1)。在文件sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时，鼠标单击—个单选按钮，则Text1中显示相应季度的销售总额，并把相应的文字显示在标签上。图2是单击“第三季度”单选按钮所产生的结果。请填空。


Dim sales(12) As Long
Private Sub Form_load()
Open "sales.txt" For Input As #1
Fork=1 To 12
Input #1,sales(k)
Next k
Close #1
End Sub
Private Sub （）(Index As Integer)
Dim sum As Long,k As Integer,month As Integer
sum=0
month=Index* （）
For k=1 To 3
month=month+1
sum=sum+sales(month)
Next K
Label1.Caption=Op1(Index).（） &"销售总额"
Text1=sum
End Sub