帮忙查看个程序，题目是：编写一个 Find 函数，能够查找用户输入的数是否在一个随机数组中，如在数组中，则把它的位置显示出来。例如， a 数组中有随机产生的 5 个数： 3 ， 8 ， 9 ， 5 ， 2 。如果用户输入 9 ，调用 Find 函数后能够显示： 9 在数组 a 中，是第 3 个数。 
    我编写的程序是：form的activate事件：for i=1 to 100
    yes=1
    do while yes=1
        x=int(rand()*100)
        yes=0
        for j=1 to i-1
            if x=val(a(j))
             yes=1
             exit
            endif
        endfor
    enddo
    a(i)=str(x,3)
endfor
thisform.list1.numberofelements=100
find事件：para m
m=thisform.text1.value
for i=1 to 10
    for j=1 to 10
        if m=val(a(i,j))
           l=1
        else
           l=0
        endif
    endfor
endfor        
    if l=1
   messagebox(m+"在数组中，是第"+str(i,1)+"行,第"+str(j,1)+"列")
    else
   messagebox(m+"不在数组中")
    endif
    return i 
load事件：public a(10,10)
unload事件：release a
请问到底什么地方出问题了，为什么结果显示不出来？？