【正确答案】正确答案：【操作步骤】 步骤1：打开考生文件夹中的本题工程文件sit5．vbp，在代码编辑窗口的指定位置编写以下代码： 参考代码： Textl．Text=n count1=0 count2=0 count3=0 count4=0 count5=0 count6=0 For i=1 To n Y=Int(arr(i)／10) Select Case Y Case 1 2 3 t 4 l 5 countl=countl+1 Case 6 count2=count2+1 Case 7 count3=count3+1 Case 8 count4=count4+1 Case 9，10 count5=count5+1 End Select Next Text2．Text=courtt1 Text3．Text=count2 Text4．Text=count3 Text5．Text=count4 Text6．Text=count5 步骤2：按＜F5＞键运行程序，先单击“统计”按钮，冉单击“保存”按钮。 步骤3：按要求将文件保存至考生文件夹中。