数组中数据：
20100 1
20101 2
20105 4
20107 5
20111 6
20113 8
20117 9
20119 10
20123 9
20125 8
20129 7
20131 6
20135 5
20137 4
20141 3
20143 2
20147 1
20149 3
20153 5
20157 7
20159 8
20163 9
20165 10
20169 8
20171 6
20175 4
20179 3
20181 2
20185 1
20187 4
20191 5
20193 6
。。。。
要求编写代码求出第二列数据在3.5到8.5之间（和8.5到3.5之间）对应`的第一列数的段落，同时再求出位于3.5到8.5之间（和8.5到3.5之间）区间的第二列数的平均值。
其中：
1、 要求采用VB6.0循环结构和数组编写代码。
2、 数据的第二列数是没有规律的。
拜谢大虾指教，谢谢！