主题：怎么计算去除3个最小值盒3个最大值后再求平均值，跪求大神指点

取出各个值，放进数组里，sort一下，然后去掉前三后三。

dim ary() as double = {9,5,8,7,1,4,3,2,6}
array.sort(ary)
dim sum as double = 0
For i As Integer = 3 To ary.length - 4
    sum += ary(i)
    msgbox(ary(i))
Next
msgbox(sum / (ary.length - 6))