[填空题] 下面程序的功能是找出给定的10个数中最大的一个数，最后输出这个数以及它在原来10个数中的位置。请在下划线处填入适当的内容，将程序补充完整。 Option Base 1 Private

[填空题] 下面程序的功能是找出给定的10个数中最大的一个数，最后输出这个数以及它在原来10个数中的位置。请在下划线处填入适当的内容，将程序补充完整。

Option Base 1

Private Sub Form_Click()

Dim X

x=Array(23,-5,17 ,38,-31,46,11,8,5,-4)

Max=1

k=1

10k=k+1

if x(k)＞x(Max) then

(14)

End if

If k＜10 then goto 10

y= (15)

Print y,Max

End Sub