怎么找出5*5数组中最大数的位置

dim a(1 to 5,1 to 5) as integer,maxnumber as ineger,c as integer ,d as integer
maxnumber=a(1,1)
for i=1 to 5
     for j=1 to 5
         if (i,j)>maxnumber then
               maxnumber=a(i,j)
               c=i
               d=j
         endif
     next j
next i
label1.caption="5*5数组中最在数的位置是：a(" & c &"," & j & ")"