填空题

下列程序的功能是：找出给定的12个数中最大的一个数，然后输出这个数以及它在原来12个数中的位置。请填空。
Option Base 1
Private Sub Form_Click()
Dim X
x=Array(57，-9，17，42，-31，46，11，8，6，-4，3，90)
Max=1
For k=2 To 10 Step 1
If x(k)＞x(Max)Then
______
End If
Next k
Y=______
End Sub