在窗体上先画一个名为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 【12】 (Index As Integer) Dim sum As Long,k As Integer,month As Integer sum=0 month=Index* 【13】 For k=1 To 3 month=month+1 sum=sum+sales(month) Next K Label1.Caption=Op1(Index). 【14】 &"销售总额" Text1=sum End Sub

在以下哪种抽样方法中，总体中每个样本项目金额的变化性会影响样本量（）？

A.属性抽样

B.发现抽样

C.每单位均值抽样

D.货币单位抽样