二零零四年奥斯卡最大赢家是导演彼得？杰克森所执导的‘魔戒三部曲’，其主要拍摄地点在何处？

下列程序的输出结果是______。
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