第8题: [填空题]下列程序的输出结果是______。 Private Sub Commandl_Click( ) Dim alt(1 To 10) Fori=1 To 10 arr(i) =i Next i For Each i In arr( ) arr(i) =arr(i) *2+1 Next i MsgBox arr(7) End Sub 参考答案:O 答案解析:[解析] 本题考查VBA中For Each...Next循环的知识。For Each...Next循环是一种特殊的循环,这种循环只能用在数组中,用来遍历数组中的每一个元素。本题中的第一个循环为数组的每