窗体上有一个名称为Command1的命令按,单击该按所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按的单击事件过程如下: Private Sub Command1_Click() Dim a(10)As Integer Dim x As Integer For i = 1 To 10 a(i)= Int(Rnd * 100) Next x = InputBox("输入100以内的整数:") p = 0 For i = 1 To 10 If a(i)= x Then p = i Exit For End If Next If p = 0 Then Print "没有找到与输入数据相同的数!" Else Print Str(x)+ "在数组中的位置是" + Str(p) End If End Sub 对于上述事件过程,以下叙述中正确的是( )