一道VB题 希望各位大侠帮忙

求一位数组中各元素之和，最小数组元素，并将最小数组元素与数组中的第一个元素交换。
代码如下：
Private Sub command1_Click()
Dim a, i%, min%, imin%, sum%, t%
a = Array(26, 43, 61, 87, 33, 19, 37, 59, 76, 69)
min = a(0): imin = 0: sum = a(0)
For i = 1 To UBound(a)
sum = sum + a(i)
If a(i) < min Then min = a(i): a(imin) = i
Next i
t = a(0): a(0) = a(imin): a(imin) = t
Print "数组元素和="; sum, "最小元素值为："; a(0)
End Sub

我有几个问题：
1 min = a(0)，其中a(0)是什么意思呢？
2 为什么imin = 0
3为什么 sum = a(0)？这里的a(0)与min = a(0)的a(0)事一样的吗？
4 For i = 1 To UBound(a)这条语句中为什么不写成For i = LBound（a）To UBound(a)？？1是什么意思呢？
5 我在VB中运行的时候结果是 数组元素和=510 最小元素值为：5
可是为什么最小元素值是5呢？Array(26, 43, 61, 87, 33, 19, 37, 59, 76, 69)中并没有5啊。。。
6 “ 并将最小数组元素与数组中的第一个元素交换”这句话在VB运行时怎么没有显示出来呢 ？ imin 是数组中的第一个元素的意思吗，还是数组下标的意思？？？
希望各位大侠指教 我是VB初学者啊。。。好希望把它学好。。。讲解清楚的我再提高奖励。。小女子先谢谢了

1、a（0）就是下标为零的数组元素，也就是后面说的“第一个元素”；
2、imin是指最小元素（min）的下标，这里imin = 0就是暂时将a（0）当做最小的元素；
3、sum是指个元素之和，这里sum = a(0)首先把第一个元素写到sum里，后面通过um = sum + a(i)依次将其他元素加进来。所有的a（0）都是一样的，指当前的第一个元素；
4、因为前面已经处理了a（0），所以就下标从1开始，而不是用LBound（a）；
5、这是编程错误引起的。具体的位置是If a(i) < min Then min = a(i): a(imin) = i中间的 a(imin) = i，这里本来是记录最小元素的位置i到imin中，但写程序的人搞错了，把最小的元素的序号i写到数组里面了（本数组最小的是第六个数19，下标为5），所以最后输出了5；
6、 t = a(0): a(0) = a(imin): a(imin) = t就是“将最小数组元素与数组中的第一个元素交换”的代码；imin上面已经说过了；

改错结果为：
Private Sub command1_Click()
Dim a, i%, min%, imin%, sum%, t%
a = Array(26, 43, 61, 87, 33, 19, 37, 59, 76, 69)
min = a(0): imin = 0: sum = a(0)
For i = 1 To UBound(a)
sum = sum + a(i)
If a(i) < min Then min = a(i): imin = i
Next i
t = a(0): a(0) = a(imin): a(imin) = t
Print "数组元素和="; sum, "最小元素值为："; a(0)
End Sub

最后运行输出：
数组元素和= 510 最小元素值为： 19

温馨提示：内容为网友见解，仅供参考

当前网址：https://11.t2y.org/zz/svv4psf2v.html