？数组的问题.为什么在数组中添加了数据后.在次显示就只能显示最后一条记录?????紧急

2001-12-18 12:27:11 169 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

城市间紧急救援(dijkstra+一维数组记录路径信息) 作为一个城市的应急救援队伍的负责人，你有一张特殊的全国地图。在地图上显示有多个分散的城市和一些连接城市的快速道路。每个城市的救援队数量和每一条连接两个城市的快速道路长度都标在地图上。当其他城市有紧急求助电话给你的时候，你的任务是带领你的救援队尽快赶往事发地，同时，一路上召集尽可能多的救援队。输入格式: 输入第一行给出4个正整数N、M、S、D，其中N（2≤N≤500）是城市的个数，顺便假设城市... 阅读详情

For i = 0 To 4
ReDim arr(i)
arr(i) = i + 10250
If rs.State = adStateOpen Then rs.Close
Str = "select freight from orders where " & arr(i) & "=orderid "
rs.Open Str, cn, adOpenDynamic, adLockReadOnly
ReDim arr1(i)
arr1(i) = rs.Fields(0)
' Print arr1(i)
Next
Print ""
For i = 0 To UBound(arr1)
Print arr1(i)
Next i

print arr1(i) 只能显示最后一条记录.为什么???我要全部显示啊

...全文