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

admin2010-11-20 105

问题下面程序的功能是找出给定的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