有一个数组,里面存放10个整数,要求找出最小的数及其下标,然后把它和数...答:'用VB6新建一个工程 , 加入以下代码:Private Sub Form_Load()a = "5,8,3,2,1,4,9,7,0,6"b = Split(a, ",")d = 1000 For c = 0 To UBound(b)If CInt(b(c)) < d Then d = b(c): e = c Next temp = b(0)b(0) = b(e)b(e) = temp MsgBox "数组内容分别为...