填空题
请填空。
Dim sales(12)As Long
Private Sub Form_Load()
Open¨sales.txt¨For Input As #
For k=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 4-1
sum= sum+ sales(month)
Next k
Label1. Caption=Op1 (Index). 【 】 &"销售总额:"
Text1=sum
End Sub