英语翻译
select user
thisform.n=thisform.n+1
locate for alltrim(username)=alltrim(thisform.text1.value)
if found() and alltrim(userpasswd);
=alltrim(thisform.text2.value)
g_username=thisform.text1.value
thisform.release
do main_menu.mpr
_screen.visible=.T.
else
if thisform.n