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

Dimsales(12)AsLong
PrivateSubForm__Load()
open“sales.txt”ForInputAS#1
Fork=1To12
Input#1,sales(k)
Nextk
Close#1
EndSub
PrivateSub_______(Index,ASInteger)
DimsumASLong,kASIngeger,monthASIngeger
sum=0
month=Index*_______
Fork=1To3
month=month+1
sum=sum+sales(month)
Nextk
Label1.Caption=Opl(Index)._______&“销售总额:”
Text1=sum
EndSub
参考答案:
答案解析: