【正文】 3)) =alltrim(str(a4)) case =2 mch=alltrim() sele course locate for 課程名稱=mch dm=課程代碼 sele score calculate max(成績(jī)),min(成績(jī)),avg(成績(jī)),t(成績(jī)) for 課程代碼=dm to b1,b2,b3,b4 =alltrim(str(b1)) =alltrim(str(b2)) =alltrim(str(b3)) =alltrim(str(b4))Endcase 添加添加選項(xiàng)卡中，一個(gè)包括5項(xiàng)內(nèi)容，有學(xué)生表，教師表，班級(jí)表，成績(jī)表，課程表。學(xué)生表：學(xué)生表包括一個(gè)輸入文本框，一個(gè)下拉選項(xiàng)菜單，三個(gè)功能按鍵，顯示文本框有學(xué)號(hào)，班級(jí)編號(hào)，姓名，出生日期，下拉菜單是選擇學(xué)生性別；三個(gè)功能按鍵是添加，重寫和返回。在輸入文本框中輸入想要輸入的學(xué)生信息，點(diǎn)擊添按鍵，即可向系統(tǒng)添加這個(gè)學(xué)生的信息，若是輸入的信息有誤，點(diǎn)擊重寫按鍵，可以重新輸入學(xué)生信息，返回，返回上個(gè)選項(xiàng)。圖 學(xué)生表添加圖 添加學(xué)生信息學(xué)生表選項(xiàng)卡代碼如下：Command1的click事件： n1=alltrim() n2=alltrim() n3=alltrim() n4=alltrim(dtoc()) n5=alltrim()set exact ondo casecase n1=39。39。 messagebox(39。學(xué)號(hào)不能為空值！39。,48,39。注意39。) case n2=39。39。 messagebox(39。姓名不能為空值！39。,48,39。注意39。) case n3=39。39。 messagebox(39。性別不能為空值！39。,48,39。注意39。) case n4=39。39。 messagebox(39。不能輸入空值！39。,48,39。注意39。) case n5=39。39。 messagebox(39。班級(jí)編號(hào)不能為空值！39。,48,39。注意39。) otherwise a=messagebox(39。確認(rèn)添加新記錄到學(xué)生表！39。,1+64+0,39。提示信息39。) if a=1 sele student go bottom insert into student value(n1,n2,n3,ctod(n4),n5) b=messagebox(39。新記錄添加成功！39。,64,39。提示信息39。) if b=1 =39。39。 =39。39。 =39。39。 ={} =39。39。 endif endifendcase教師表：教師表包括三部分內(nèi)容，分別是輸入文本框，下拉選項(xiàng)菜單，功能按鍵；其中，輸入文本框包含教師代碼，籍貫，姓名，出生日期和備注；下拉選項(xiàng)菜單包括技術(shù)職務(wù)和性別兩項(xiàng)；功能按鍵，包括添加，重新和返回。輸入文本框，可以想教師表輸入教師的相關(guān)信息；下拉選項(xiàng)菜單，可以選擇教師的職務(wù)，比如教授，講師等，性別，選擇老師的性別信息；功能按鍵，用來當(dāng)輸入教師信息正確時(shí)，向教師表確定添加教師信息，還有當(dāng)教師信息輸入錯(cuò)誤時(shí)，重新輸入教師信息的命令按鈕，返回，是返回上一頁面。圖 教師表內(nèi)容展示圖 教師表選項(xiàng)卡代碼如下：Command1的click事件：n1=alltrim()n2=alltrim()n3=alltrim()n4=alltrim(dtoc())n5=alltrim()n6=alltrim()n7=alltrim()set exact ondo casecase n1=39。39。 messagebox(39。教師代碼不能為空值！39。,48,39。注意39。) case n2=39。39。 messagebox(39。姓名不能為空值！39。,48,39。注意39。) case n3=39。39。 messagebox(39。性別不能為空值！39。,48,39。注意39。) case n4=39。39。 messagebox(39。不能輸入空值！39。,48,39。注意39。) case n5=39。39。 messagebox(39。籍貫不能為空值！39。,48,39。注意39。) case n6=39。39。 messagebox(39。技術(shù)職務(wù)不能為空值！39。,48,39。注意39。) otherwise a=messagebox(39。確認(rèn)添加新記錄到教師表！39。,1+64+0,39。提示信息39。) if a=1 sele teacher go bottom insert into teacher values(n1,n2,n3,ctod(n4),n5,n6,n7) b=messagebox(39。新記錄添加成功！39。,64,39。提示信息39。) if b=1 =39。39。 =39。39。 =39。39。 ={} =39。39。 =39。39。 =39。39。 endif endifEndcaseCommand2的click事件：=39。39。=39。39。=.F.=39。39。={}=39。39。=.F.=39。39。=39。39。班級(jí)表：其中班級(jí)表中包括三部分內(nèi)容，分別是輸入文本框，兩個(gè)下拉選項(xiàng)菜單，還有三個(gè)功能按鍵；輸入文本框包括班級(jí)編號(hào)，系代碼，年級(jí)花和專業(yè)；下拉選項(xiàng)菜單，有學(xué)制和類別兩項(xiàng)內(nèi)容。輸入文本框，可以向班級(jí)表中添加相應(yīng)的信息；下拉選項(xiàng)菜單，可以選擇學(xué)生的學(xué)制年數(shù)，還有選擇學(xué)科類別，類別這一項(xiàng)中，如果沒有相應(yīng)的選項(xiàng)，也可以直接輸入需要的信息；功能按鍵，用于確定或者修改輸入的信息，返回，用于返回主菜單。，向班級(jí)表中輸入信息。 班級(jí)表信息 向班級(jí)表添加信息班級(jí)表選項(xiàng)卡代碼如下：Command1的click事件：n1=alltrim()n2=alltrim()n3=alltrim()n4=alltrim()n5=alltrim()n6=alltrim()set exact ondo casecase n1=39。39。 messagebox(39。班級(jí)編號(hào)不能為空值！39。,48,39。注意39。) case n2=39。39。 messagebox(39。年級(jí)不能為空值！39。,48,39。注意39。) case n3=39。39。 messagebox(39。專業(yè)不能為空值！39。,48,39。注意39。) case n4=39。39。 messagebox(39。系代碼不能為空值！39。,48,39。注意39。) case n5=39。39。 messagebox(39。學(xué)制不能為空值！39。,48,39。注意39。) case n6=39。39。 messagebox(39。類別不能為空值！39。,48,39。注意39。) otherwise a=messagebox(39。確認(rèn)添加新記錄到班級(jí)表！39。,1+64+0,39。提示信息39。) if a=1 sele classes go bottom insert into classes values(n1,n2,n3,n4,n5,n6) b=messagebox(39。新記錄添加成功！39。,64,39。提示信息39。) if b=1 =39。39。 =39。39。 =39。39。 =39。39。 =39。39。 =39。39。 endif endifEndcaseCommand2的click事件：=39。39。=39。39。=39。39。=39。39。=.F.=.F.=39。39。=39。39。課程表：課程表中同樣包括三項(xiàng)內(nèi)容，分別是兩個(gè)輸入文本框；兩個(gè)下拉選項(xiàng)菜單，分別是類別和教師代碼；三個(gè)功能按鍵，是添加，重寫和返回。輸入文本框是向課程表中添加新的課程信息，一邊及時(shí)更新課程信息，供學(xué)生參考使用；下拉選項(xiàng)菜單，是選擇教師的代碼信息和課程的信息；功能按鍵，是用于確定或者重新輸入信息的，返回，用于返回上一層。 圖 課程表信息圖 課程表信息選項(xiàng)卡代碼如下：Command1的click事件：n1=alltrim()n2=alltrim()n3=alltrim()n4=alltrim()set exact ondo casecase n1=39。39。 messagebox(39。課程代碼不能為空值！39。,48,39。注意39。) case n2=39。39。 messagebox(39。課程名稱不能為空值！39。,48,39。注意39。) case n3=39。39。 messagebox(39。類別不能為空值！39。,48,39。注意39。) case n4=39。39。 messagebox(39。教師代碼不能為空值！39。,48,39。注意39。) otherwise a=messagebox(39。確認(rèn)添加新記錄到課程表！39。,1+64+0,39。提示信息39。) if a=1 sele course go bottom insert into course values(n1,n2,n3,n4) b=messagebox(39。新記錄添加成功！39。,64,39。提示信息39。) if b=1 =39。39。 =39。39。 =39。39。 =39。39。 endif endifEndcaseCommand2的click事件：=39。39。=39。39。=.F.=.F.=39。39。=39。39。成績(jī)表：包括兩個(gè)下拉選項(xiàng)菜單，學(xué)號(hào)和課程代碼；一個(gè)輸入文本框，成績(jī)；三個(gè)功能按鈕，添加，重寫和返回。 成績(jī)表信息成績(jī)表項(xiàng)卡的代碼如下：Command1的click事件：n1=alltrim()n2=alltrim()n3=alltrim()set exact ondo case case n1=39。39。 messagebox(39。學(xué)號(hào)不能為空值！39。,48,39。注意39。) case n2=39。39。 messagebox(39。課程代碼不能為空值！39。,48,39。注意39。) case n3=39。39。 messagebox(39。成績(jī)不能為空值！39。,48,39。注意39。) other