请高手们帮我分析以下代码，在运行时出现错误，说是  locate for 试题号=asth1(curflag1)操作符/操作类型不匹配，怎样来解决这个问题呢？其中curflag1，tmun2为公共变量。
.........
 For lnCnt=1 To tmun2
 Do While .T.
    lnRecord=Int(Rand()*Reccount()+1)
    Go lnRecord
      If !Deleted()
      Delete
      Exit
    EndIf
  EndDo
EndFor
dime asth1(tmun2)
store 试题号 to asth1(tmun2)
............
for curflag1=1 to tmun2
do while !eof()
curflag1=curflag1+1
 locate for 试题号=asth1(curflag1)
 replace xf with .t.
enddo
endfor

以后别这样提问。分析代码可以，怎么解决就不能随便回答了。因为你没有告诉我们你的程序是用来解决什么问题的。

对不起tiger,你的学问，你的为人，真使人敬佩！在这里我可以问你一些个人的问题吗？你是一位大学教授吗？在哪个大学呢？我想请教一些问题，我是一位中学教师，想学习编程开发软件，怎样学得比较快呢？需要看那些书籍呢？能给我推荐一下吗？去年我刚接触vfp,现在,在你们的帮助下，本人试做几个很实用小软件并取得成功，在这方面很感兴趣。希望得到你多方面的指点，在此，再次向你表示衷心的感谢！

原来 TZTJ 是一位教师，失敬了。