Command1(查询)的CLICK事件代码是
if thisform.optiongroup1.value=1
   a=0
   locate for allt(js.gh)=allt(thisform.text1.value)
   if found()
      cxgh=allt(thisform.text1.value)
      do form 教师信息浏览界面.scx
   else
      messagebox("该工号无记录，请重新输入教师工号")
      thisform.text1.setfocus
   endif
else
    a=1
    locate for allt(js.xm)=allt(thisform.text1.value)
    if found()
       cxxm=allt(thisform.text1.value)
       do form 教师信息浏览界面.scx
    else
       messagebox("该姓名无记录，请重新输入教师姓名")
       thisform.text1.setfocus
    endif
endif

单这段代码看a=0,a=1没什么意思

有可能在用a值的变化，控制某个控件的状态。

那要看什么？

程序不是你编的，你就不要管a的用途了，如果你需要以上那段代码，你就用。a没有用，。

看上去a像是一个控制开关或一种标志。在本段程序代码里没有什么作用，但不代表在其它程序段里没有作用。楼主，你单纯把这段代码贴上来可能说明不了什么问题。

单看这一段代码，的确变量a 没有什么意义。
你可以注释掉 这段代码，看看系统的运行情况，找到变量a的影响点。