'把3个数组的值复制到第四个数组
For i = 1 To 490
   If i <= 140 Then
   c4(i) = c1(i)
   ElseIf 141 <= i And i <= 290 Then
   c4(i) = c2(i - 140)
   Else: c4(i) = c3(i - 290)
   End If
Next i

'对第四个数组进行排序
For i = 1 To 489
xiabiao(i) = i
Next i
For i = 1 To 489
   For j = i + 1 To 490
   If c4(i) > c4(j) Then
   b = c4(i): c4(i) = c4(j): c4(j) = b
   temp1 = xiabiao(i)
   xiabiao(i) = xiabiao(j)
   xiabiao(j) = temp1
   End If
   Next j
Next i


调试的时候c4(i)=c1(i)的值左右不相等

一开始就不等了。