没考上大学能去做什么:vfp中怎样使用焦点也就是focus

gotfocus\lostfocus\setfocus
分别怎样用？
听说可以使程序人性化
怎样在文本框中使用
我做设计时候遇到的问题
需要在文本框中输入一个数字，它会从表中查找那个符合的记录并显示
怎样使用焦点来实现，谢谢
教材上说是在lostfocus中使用
thisform.gh.refresh
locate for alltrim(thisform.gh.value)==alltrim(gh)
if not found()
=messagebox('没有该成员')
thisform.gh.value=''
thisform.command1.enabled=.f.
thisform.command2.enabled=.f.
thisform.command3.enabled=.f.
thisform.command4.enabled=.f.
thisform.cmdgp.command1.enabled=.f.
thisform.cmdgp.command2.enabled=.t.
thisform.cmdgp.command3.enabled=.f.
thisform.cmdgp.command4.enabled=.t.
go top
else
scatter memvar
thisform.txtbmmc.enabled=.f.
thisform.txtxm.enabled=.f.
thisform.txtjbgz.enabled=.t.
thisform.txtct.enabled=.t.
thisform.txtjj.enabled=.t.
thisform.txtgjt.enabled=.t.
thisform.txtylt.enabled=.t.
thisform.txtyfgz.enabled=.t.
thisform.txtgjj.enabled=.t.
thisform.txtylj.enabled=.t.
thisform.txtsfgz.enabled=.t.
thisform.command1.enabled=.f.
thisform.command2.enabled=.f.
thisform.command3.enabled=.f.
thisform.command4.enabled=.f.
thisform.cmdgp.command1.enabled=.t.
thisform.cmdgp.command2.enabled=.f.
thisform.cmdgp.command3.enabled=.t.
thisform.cmdgp.command4.enabled=.f.
endif
thisform.refresh
帮助一下谢谢