【正文】 ET fqsr 。 SIZE , 。 FONT 宋體, 11 。 WHEN a3 。 PICTURE *HT 退出輸入 。 DEFAULT 1 。 STYLE B 。 VALID _11i0sqno6() , GET bcjl 。 SIZE , 。 FONT 宋體, 11 。 WHEN a3 。rborderIF = ON SET TALK ONENDIFIF = ON SET COMPATIBLE ONENDIFREGION 1proc abcvxh=space(4)vxm=space(8)vzy=1vxb=space(2)vcsrq=ctod(39。)vrxcj=0vzzmm=1vjl=space(200)retuFUNCTION _11i0sqnn4 amp。 vxh VALIDREGION 1seek alltrim(vxh)if found() vxh=space(4) wait wind 39。 a1=.f. a2=.t. a3=.f.else a1=.f. a2=.f. a3=.t.endifshow getsFUNCTION _11i0sqnnr amp。 srjl VALIDREGION 1do abca1=.f.a2=.t.a3=.f.show getsFUNCTION _11i0sqnny amp。 fqsr VALIDREGION 1do abca1=.t.a2=.f.a3=.f.show getsFUNCTION _11i0sqno6 amp。 tcsr VALIDREGION 1cd1=.f.FUNCTION _11i0sqnp0 amp。 bcjl VALIDREGION 1appe blanrepl 學號 with vxhrepl 姓名 with vxmrepl 專業(yè) with str(vzy,1)repl 性別 with vxbrepl 出生日期 with vcsrqrepl 入學成績 with vrxcjdo casecase vzzmm=1repl 政治面貌 with 39。case vzzmm=2repl 政治面貌 with 39。case vzzmm=3repl 政治面貌 with 39。endcaserepl 簡歷 with vjldo abca1=.t.a2=.f.a3=.f.show gets (編輯模塊) REGION 0REGIONAL , , IF SET(TALK) = ON SET TALK OFF = ONELSE = OFFENDIF = SET(COMPATIBLE)SET COMPATIBLE FOXPLUS = SET(READBORDER)SET READBORDER ON = SELECT()IF NOT WEXIST(_11i0nd87c) DEFINE WINDOW _11i0nd87c 。 SIZE , 。 FONT MS Sans Serif, 8 。 NOCLOSE 。 SYSTEM 。 / / 39。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , SAY 姓名 。 STYLE BT 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , SAY 性別 。 STYLE BT 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , SAY 入學成績 。 STYLE BT 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , SAY 學 生 信 息 編 輯 窗 口 。 STYLE BT 。 PEN 2, 8 。 COLOR RGB(0,0,255,) , SAY 政治面貌 。 STYLE BT 。 PEN 2, 8 。 COLOR RGB(0,0,255,0,0,255) , SAY 請輸入學號： 。 STYLE BT 。 SIZE , 。 FONT 宋體, 9 。 WHEN a2 。 COLOR ,RGB(,0,255,0) , GET vxm 。 DEFAULT 。 PICTURE K 。 COLOR ,RGB(,0,255,0) , GET vxb 。女 。 DEFAULT 男 。 WHEN a3 。 PICTURE ^ 計算機信息管理。計算機軟件。行政管理。 SIZE , 。 FONT 宋體, 9 。 COLOR ,RGB(,0,255,0),RGB(,0,255,0) , GET vzzmm 。團員。 SIZE , 。 FONT 宋體, 9 。 WHEN a3 。 SIZE , 。 FONT 宋體, 9 。 WHEN a3 。 SIZE , 。 DEFAULT 0 。 PICTURE K 999 。 COLOR ,RGB(,0,255,0) , EDIT vjl 。 PICTURE K 。 FONT 宋體, 9 。 WHEN a3 。 PICTURE *HN 修改記錄 。 DEFAULT 1 。 STYLE B 。 VALID _11i0nd8kw() , GET scjl 。 SIZE , 。 FONT 宋體, 11 。 WHEN a1 。 PICTURE *HN 保存修改 。 DEFAULT 1 。 STYLE B 。 VALID _11i0nd8la() , GET fqxg 。 SIZE , 。 FONT 宋體, 11 。 WHEN a3 。 PICTURE *HT 退出編輯 。 DEFAULT 1 。 STYLE B 。 VALID _11i0nd8lp()IF NOT WVISIBLE(_11i0nd87c) ACTIVATE WINDOW _11i0nd87cENDIFREAD CYCLERELEASE WINDOW _11i0nd87cSELECT ()REGION 0SET READBORDER amp。 / / 39。amp。該學號所對應的記錄不存在39。amp。amp。amp。amp。amp。 AT , 。 TITLE 學生信息查詢窗口 。 FLOAT 。 MINIMIZE 。 COLOR RGB(,0,255,255) MOVE WINDOW _11i0swe35 CENTERENDIFREGION 1set talk offset safe offuse xsxxgo topdo case case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。endcasea1=.f.a3=.f.cd1=.t.show getsREGION 1IF WVISIBLE(_11i0swe35) ACTIVATE WINDOW _11i0swe35 SAMEELSE ACTIVATE WINDOW _11i0swe35 NOSHOWENDIF , SAY 學號 。 STYLE BT 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , SAY 專業(yè) 。 STYLE BT 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , SAY 出生日期 。 STYLE BT 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , SAY 政治面貌 。 STYLE BT 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , GET 。 DEFAULT 。 PICTURE K 9999 。 COLOR ,RGB(,0,255,0) , GET 。 DEFAULT 。 PICTURE K 。 COLOR ,RGB(,0,255,0) , GET 。 DEFAULT { / / } 。 PICTURE K 。 COLOR ,RGB(,0,255,0) , GET 。 RANGE 0 。 FONT 宋體, 9 。 WHEN a3 。 SIZE , 。 DEFAULT 。 SCROLL 。 COLOR ,RGB(,0,255,0) , GET 。 DEFAULT 。 PICTURE K 。 COLOR ,RGB(,0,255,0) , GET 。 DEFAULT 。 PICTURE K 。 COLOR ,RGB(,0,255,0) , GET vzy1 。 DEFAULT 。 PICTURE K 。 COLOR ,RGB(,0,255,0) , GET phan 。末記錄。下一條 。 DEFAULT 1 。 STYLE B 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , GET vxh 。 DEFAULT 。 PICTURE K 9999 。 COLOR ,RGB(,0,255,0) , SAY 姓名 。 STYLE BT 。 SIZE , 。 FONT 宋體, 9 。 WHEN a1 。 FONT 宋體, 11 。 COLOR RGB(0,0,255,) , GET vzy 。計算機信息管理。計算機軟件。行政管理。 SIZE , 。 FONT 宋體, 9 。 COLOR ,RGB(,0,255,0),RGB(,0,255,0) , GET qbcx 。 SIZE , 。 FONT 宋體, 11 。 VALID _11i0swegz() , GET djcx 。 SIZE , 。 FONT 宋體, 11 。 VALID _11i0sweh6() , GET dccx 。 SIZE , 。 FONT 宋體, 11 。 VALID _11i0swehe() , GET zxcx 。 SIZE , 。 FONT 宋體, 11 。 WHEN a1 。 FONT 楷體_GB2312, 18 。 COLOR RGB(255,0,0,) , TO , 。 STYLE 16 。 FONT 仿宋_GB2312, 12 。 COLOR RGB(0,128,128,) , TO , 。 STYLE 16 。 PEN 2, 8 。 COLOR RGB(0,128,128,) , TO , 。 STYLE 16 。rborderIF = ON SET TALK ONENDIFIF = ON SET COMPATIBLE ONENDIFREGION 1proc abcdo case case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。 case 專業(yè)=39。 vzy1=39。