執行主程序前先設計一個用戶登錄表單，要求輸入用戶名和密碼才能登錄到主程序。在表單上已經設計好了兩個文本框（用于輸入用戶名和密碼），兩個命令按扭。command1和command2即確定和退出，已經建好了數據庫和表并有一個用戶記錄 用戶名ccc密碼 123（數據庫中的表）。在command1 的click什么代碼？

熱心網友

use renshi\database\checkercname=alltrim( lue)ppassword=alltrim( lue)set order to nameseek cnameif alltrim( )!=cnamecn=cn+1 cMessageTitle='設備管理系統' cMessageText='用戶名錯誤，請重新輸入' nDialogType=4+32 nAnswer=messagebox(cMessageText,nDialogType,cMessageTitle) do case case nAnswer=6 lue='' tfocus case nAnswer=7 cMessageTitle='人事管理系統' cMessageText='不要亂來' messagebox(cMessageText,nDialogType,cMessageTitle) lease endcase if cn=3 lease endif nanswer=messagebox(cMessageText,nDialogType,cMessageTitle) do case case nAnswer=6 lue='' tfocus case nAnswer=7 cMessageTitle='人事管理系統' cMessageText='不要亂來' messagebox(cMessageText,nDialogType,cMessageTitle) lease endcase if cn=3 leaseendif。