下面程序的功能是找出给定的10个数中最大的一个数,最后输出这个数以及它在原来 10个数中的位置。

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

Option Base 1

Private SubForm_Cfick()

Dim X

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

Max=1

k=1

10 k=k+1

ifx(k)＞x(max)then

[13]

End if