005.prg

来自「图书馆管理系统」· PRG 代码 · 共 25 行

use 管理员密码   
loca for 管理员=a
if eof()&&如果没有符合条件的
&&thisform.hide&&
 &&thisform.release&&
   do form 对不起1&&
   cancel&&
else &&
   if 密码<>b&&
   &&thisform.hide&&
  && thisform.release&&
		do form 对不起1&&
		cancel
	   &&
   &&endif&&
   else
    if allt(密码)=b&&
   		
	   do form 管理员操作&&
	  &&cancel&&
  endif&&
endif&&
use