學(xué)生信息管理系統(tǒng)論文范文計(jì)算機(jī)畢業(yè)設(shè)計(jì)論文范文畢業(yè)論文范文

1系統(tǒng)技術(shù)及運(yùn)行環(huán)境1.1VisualFoxpro6.0簡(jiǎn)介VisualFoxpro6.0是計(jì)算機(jī)優(yōu)秀的數(shù)據(jù)管理系統(tǒng)軟件之一，正如其名稱中的“Visual”同樣，它采用了可視化的、面向?qū)ο蟮某绦蛟O(shè)計(jì)措施，大大簡(jiǎn)化了應(yīng)用系統(tǒng)的開(kāi)發(fā)過(guò)程，并提高了應(yīng)用系統(tǒng)的開(kāi)發(fā)過(guò)程，并提高了系統(tǒng)的模塊性和緊湊型。是新一代的小型數(shù)據(jù)庫(kù)管理系統(tǒng)的杰出代表，它以其強(qiáng)大的性能、完整而又豐富的工具、較高的處理速度、友好的界面以及較完備的兼容性，備受廣大顧客的歡迎。面前，VisualFoxpro6.0是顧客搜集信息、查詢數(shù)據(jù)、創(chuàng)立集成數(shù)據(jù)庫(kù)系統(tǒng)、進(jìn)行應(yīng)用系統(tǒng)開(kāi)發(fā)較為理想的微機(jī)數(shù)據(jù)庫(kù)管理系統(tǒng)。1.2系統(tǒng)開(kāi)發(fā)及運(yùn)行環(huán)境該運(yùn)行環(huán)境的規(guī)定是保證本需求闡明的功能得到實(shí)際真正體現(xiàn)的基礎(chǔ)。（1）運(yùn)行環(huán)境Windows98或更高版本的操作系統(tǒng)數(shù)據(jù)庫(kù)系統(tǒng)：MicrosoftVisualFoxpro6.0（2）開(kāi)發(fā)環(huán)境：開(kāi)發(fā)工具：MicrosoftVisualFoxpro6.0數(shù)據(jù)庫(kù)系統(tǒng)：MicrosoftVisualFoxpro6.02系統(tǒng)分析2.1需求分析二十一世紀(jì)以來(lái)，人類經(jīng)濟(jì)高速發(fā)展，人們發(fā)生了日新月異的變化，尤其是計(jì)算機(jī)的應(yīng)用及普及到經(jīng)濟(jì)和社會(huì)生活的各個(gè)領(lǐng)域。使原本的舊的管理措施越來(lái)越不適應(yīng)目前社會(huì)的發(fā)展。許多人還停留在此前的手工操作。這大大地阻礙了人類經(jīng)濟(jì)的發(fā)展。為了適應(yīng)現(xiàn)代社會(huì)人們高度強(qiáng)烈的時(shí)間觀念，學(xué)校信息管理系統(tǒng)軟件為學(xué)校辦公室?guī)?lái)了極大的以便。（一）教育系統(tǒng)學(xué)生管理現(xiàn)實(shí)狀況分析學(xué)校工作流程分析學(xué)校工作總體規(guī)劃由教務(wù)人員在學(xué)生信息管理系統(tǒng)中完畢對(duì)運(yùn)行教務(wù)處所需的基本數(shù)據(jù)的維護(hù)，包括這些信息的增長(zhǎng)、修改及對(duì)各項(xiàng)信息的變動(dòng)都將在這進(jìn)行操作。新的年，教務(wù)人員首先加入年級(jí)信息，然后編排班級(jí)，再對(duì)來(lái)校學(xué)生進(jìn)行基本的信息錄入，新生入學(xué)后由教務(wù)人員在學(xué)籍系統(tǒng)中完畢新學(xué)生信息的維護(hù)。（二）學(xué)校詳細(xì)需求分析學(xué)生：對(duì)各科成績(jī)的查詢?nèi)握n老師：輸入并維護(hù)所教科目的學(xué)生成績(jī)教務(wù)處：學(xué)校全體組員的信息管理，并對(duì)任課老師，班主任等輸入的信息進(jìn)行存庫(kù)，對(duì)學(xué)生的信息進(jìn)行必要的維護(hù)。通過(guò)研究調(diào)查，本系統(tǒng)需如下功能：綜合學(xué)生信息、學(xué)生成績(jī)以及信息查詢等信息。以便顧客理解和管理學(xué)生的全面動(dòng)態(tài)信息。良好的界面設(shè)計(jì)，更人性化的設(shè)計(jì)理念，使顧客擁有更輕松的使專心情。2.2可行性分析目的：可行性研究的目的是用最小的代價(jià)在盡量的時(shí)間內(nèi)確定問(wèn)題與否能處理。經(jīng)濟(jì)性：由于學(xué)校等中小型管理系統(tǒng)并不復(fù)雜，且VisualFoxpro6.0自身規(guī)定的運(yùn)行環(huán)境不高，因此一般Windows以上的系統(tǒng)環(huán)境都可以使用。實(shí)用性：本學(xué)生信息管理系統(tǒng)管理系統(tǒng)無(wú)太多復(fù)雜的操作規(guī)定，也沒(méi)有過(guò)度花哨的裝飾品，人性化的設(shè)計(jì)界面可以使操作者輕易運(yùn)用自如3總體設(shè)計(jì)3.1設(shè)計(jì)目的本系統(tǒng)可以能減少諸多不必要的資源，不用象此前那樣用冗余的紙張式的管理。大節(jié)省了學(xué)校能源。并且計(jì)算機(jī)的存儲(chǔ)與迅速查詢功能大大提高了學(xué)籍管理的效率，并且還提高了學(xué)籍信息管理的精確度。以便迅速的操作，可減少學(xué)籍信息管理的漏洞，又減少因工作的冗余出現(xiàn)的錯(cuò)誤，并且操作非常簡(jiǎn)樸，可減少許多不很必要的人員，這無(wú)論從物質(zhì)上還是工作人員的工資上都為學(xué)校節(jié)省了開(kāi)支。為學(xué)校增長(zhǎng)了財(cái)富。數(shù)據(jù)庫(kù)分析顧客需求詳細(xì)有學(xué)籍管理系統(tǒng)提供保留、更新、查詢、維護(hù)，這就需求數(shù)據(jù)庫(kù)構(gòu)造能充足滿足多種信息的輸入與輸出，實(shí)既有組織地、動(dòng)態(tài)地存儲(chǔ)大量關(guān)聯(lián)數(shù)據(jù)，以便顧客訪問(wèn)系統(tǒng)中的數(shù)據(jù)，它與文獻(xiàn)系統(tǒng)的重要區(qū)別是數(shù)據(jù)的充足共享，交叉訪問(wèn)，與應(yīng)用程序的高度獨(dú)立性。3.2項(xiàng)目規(guī)劃學(xué)生管理系統(tǒng)是各大中專院校不可缺乏的一部分，是一種VF數(shù)據(jù)庫(kù)開(kāi)發(fā)應(yīng)用程序，它重要包括顧客登錄、學(xué)生信息輸入修改、學(xué)生信息查詢以及學(xué)生成績(jī)輸入、學(xué)生成績(jī)查詢、系統(tǒng)顧客管理等幾種頁(yè)面，因而該系統(tǒng)具有較強(qiáng)的實(shí)用性。3.3系統(tǒng)功能圖學(xué)生課程信息管理學(xué)生課程信息管理學(xué)生成績(jī)信息管理系統(tǒng)管理學(xué)生成績(jī)管理系管理學(xué)生成績(jī)錄入專業(yè)管理顧客管理修改密碼退出系統(tǒng)班級(jí)管理學(xué)生班級(jí)管理學(xué)生信息管理學(xué)生信息錄入學(xué)生信息錄入學(xué)生信息錄入課程管理學(xué)生信息管理系統(tǒng)登錄系統(tǒng)主界面4系統(tǒng)詳細(xì)設(shè)計(jì)4.1數(shù)據(jù)庫(kù)設(shè)計(jì)（1）deandma.dbf，見(jiàn)表1表1字段名數(shù)據(jù)類型備注班級(jí)Char（8）主鍵Notnull系Char（10）Notnull專業(yè)Char（14）Notnull（2）grade.dbf，見(jiàn)表2表2字段名數(shù)據(jù)類型備注學(xué)號(hào)Char（8）主鍵Notnull班級(jí)Char（10）Notnull課程Char（18）Notnull成績(jī)Int(5)Notnull學(xué)期Char（2）Notnull備注MemoNull（3）stduents.dbf，見(jiàn)表3表3字段名數(shù)據(jù)類型備注班級(jí)Char（8）主鍵Notnull學(xué)號(hào)Char（8）Notnull姓名Char（8）Notnull性別Char（6）NotNull出生日期DatetimeNull政治面貌Char（8）Null身份證號(hào)碼Char（16）Null入課時(shí)間DatetimeNull籍貫Char（16）Null家庭住址Char（28）Null郵政編碼Char（6）Null照片GeneralNull備注MemoNull(4).dbf，見(jiàn)表4表4顧客信息表字段名數(shù)據(jù)類型備注姓名Char（8）主鍵Notnull密碼Char（6）Notnull標(biāo)識(shí)LogicalNotnull4.2登陸界面設(shè)計(jì)“進(jìn)入”按鈕的click事件添加如下的代碼:seleyonghuifallt(thisform.text1.value)==""messagebox(left(allt(thisform.label1.caption),6)+"為空，請(qǐng)輸入！",64,"提醒")thisform.text1.setfocuselseifallt(thisform.text2.value)==""messagebox("密碼為空，請(qǐng)輸入！",64,"提醒")thisform.text2.setfocuselsen=n+1locateforallt(姓名)=allt(thisform.text1.value);.and.allt(密碼)=allt(thisform.text2.value)iffound()ifthisform.check1.value==1.and.標(biāo)識(shí)checked=1thisform.releasedomenu.mprelseifthisform.check1.value==1.and.!標(biāo)識(shí)messagebox("你不是管理員！",48,"警告")thisform.check1.value=0elsechecked=0cyonghu=allt(姓名)cmima=allt(密碼)thisform.releasedomenu.mprendifendifelseifn>=3messagebox("你不是合法顧客，請(qǐng)與管理員聯(lián)絡(luò)！",48,"警告")thisform.releasecleareventquitelsemessagebox(left(allt(thisform.label1.caption),6)+"或密碼錯(cuò)誤，請(qǐng)重新輸入！",64,"提醒")thisform.text1.value=""thisform.text1.setfocusthisform.text2.value=""endifendifendifendif“取消”按鈕的click事件添加如下的代碼nr=messagebox("你選擇了退出登錄，與否退出？",68,"顧客登錄")ifnr=6thisform.releasequitendif4.3學(xué)生信息錄入“增長(zhǎng)”按鈕的click事件添加如下的代碼:ifthis.caption=="增長(zhǎng)"if(bo3.displayvalue=="（選擇）").or.(alltrim(thisform.text1.value)=="");.or.(alltrim(thisform.text2.value)=="")messagebox("班級(jí)、學(xué)號(hào)和姓名必須填充??！",64,"提醒")elselocateforalltrim(thisform.text1.value)=alltrim(students.學(xué)號(hào))if!eof()=messagebox("此學(xué)號(hào)已經(jīng)存在，請(qǐng)重新輸入！",64,"提醒")thisform.text1.value=""thisform.text1.setfocuselseselestudentsappendblankreplace班級(jí)withalltrim(bo3.value),學(xué)號(hào)withalltrim(thisform.text1.value);姓名withalltrim(thisform.text2.value),出生日期withctod(alltrim(thisform.text4.value));入課時(shí)間withctod(alltrim(thisform.text6.value)),籍貫withalltrim(thisform.text7.value);家庭住址withalltrim(thisform.text8.value),身份證號(hào)碼withalltrim(thisform.text8.value);備注withalltrim(thisform.edit1.value),郵政編碼withalltrim(thisform.text3.value)ifalltrim(bo4.value)==""replace性別withalltrim(bo4.displayvalue)elsereplace性別withalltrim(bo4.value)endififalltrim(bo5.value)==""replace政治面貌withalltrim(bo5.displayvalue)elsereplace政治面貌withalltrim(bo5.value)endif&&if.not.alltrim(thisform.label17.caption)==""if!pictemp==""waitwindows"正在導(dǎo)入相片，請(qǐng)等待！......."at100,40timeout2nowait&& pictemp=thisform.label17.captionappendgeneralstudents.照片from"&pictemp"endifpictemp=""this.caption="繼續(xù)"mand2.clickthis.caption="增長(zhǎng)"endif4.4學(xué)生信息修改“修改”按鈕的click事件添加如下的代碼:iththisformselestudentslocateforallt(學(xué)號(hào))=allt(.text1.value)ifallt(學(xué)號(hào))==allt(.text1.value)replace學(xué)號(hào)withallt(.text1.value),姓名withallt(.text2.value),郵政編碼withallt(.text3.value),;出生日期with.text4.value,入課時(shí)間with.text6.value,籍貫withallt(.text7.value),;家庭住址withallt(.text8.value),身份證號(hào)碼withallt(.text9.value),性別withallt(.combo4.value),;政治面貌withallt(.combo5.value),備注withallt(.edit1.value)if!pictemp==""waitwindows"正在導(dǎo)入相片，請(qǐng)等待！......."at100,40timeout2nowaitappendgeneral照片from"&pictemp"endifendifselelslocateforallt(學(xué)號(hào))=allt(.text1.value)ifallt(學(xué)號(hào))==allt(students.學(xué)號(hào))replace學(xué)號(hào)withstudents.學(xué)號(hào),姓名withstudents.姓名,郵政編碼withstudents.郵政編碼,;出生日期withstudents.出生日期,入課時(shí)間withstudents.入課時(shí)間,籍貫withstudents.籍貫,;家庭住址withstudents.家庭住址,身份證號(hào)碼withstudents.身份證號(hào)碼,性別withstudents.性別,;政治面貌withstudents.政治面貌,備注withstudents.備注,照片withstudents.照片endifpictemp=""this.enabled=.f.endwith4.5學(xué)生信息查詢“定位查詢”按鈕的click事件添加如下的代碼ifallt(thisform.text1.value)==""messagebox("請(qǐng)輸入學(xué)號(hào)或姓名！",64,"提醒")thisform.text1.setfocuselseselestulslocateforallt(學(xué)號(hào))=allt(thisform.text1.value);.or.allt(姓名)=allt(thisform.text1.value)iffound()gorecn()elsewaitwindowat18,38nowait'沒(méi)有找到你要查詢的信息！'endifendifthisform.grid1.refreshthisform.refresh“第一種”按鈕的click事件添加如下的代碼selestulsskip-1ifbof()this.enabled=.mand3.enabled=.f.messagebox("已經(jīng)到第一條記錄了！",64,"提醒")gotopelsegorecn()mand2.enabled=.mand4.enabled=.t.“單個(gè)查詢”按鈕的click事件添加如下的代碼nxx=1doformxxxg4.6系管理表單設(shè)計(jì)“增長(zhǎng)”按鈕的click事件添加如下的代碼setordertotagsetsafetyoffifalltrim(thisform.text1.value)==""messagebox("系名為空，請(qǐng)輸入！",64,"提醒")thisform.text1.setfocuselselocatefordeandma.系=alltrim(thisform.text1.value)if.not.eof()messagebox("系名已經(jīng)存在，請(qǐng)重新輸入！",48,"提醒")thisform.text1.value=""thisform.text1.setfocuselseappendblankreplacedeandma.系withalltrim(thisform.text1.value)thisform.text1.value=""thisform.text1.setfocusendifthisform.list1.clearthisform.list1.init&&重新顯示list列表thisform.list1.value=""endif“刪除”按鈕的click事件添加如下的代碼Setsafetyoffifthis.caption=="取消"thisform.text2.value=""thisform.text2.enabled=.f.thisform.label3.enabled=.f.this.caption="刪除"mand1.enabled=.mand2.caption="修改"elseifalltrim(thisform.text1.value)==""messagebox("缺乏完整信息，無(wú)法刪除！",0+48,"警告")thisform.text1.setfocuselsethisform.list1.value=alltrim(thisform.text1.value)nn=messagebox("與否確定刪除此系單位,其所屬的專業(yè)班級(jí)的數(shù)據(jù)庫(kù)都將刪除！",1+48,"警告")ifnn==1t=0usedata\deandmagotopdowhile.not.eof()ifalltrim(系)==alltrim(thisform.text1.value)deletepackt=1endifskipenddoift==0messagebox("將刪除的內(nèi)容不存在，請(qǐng)重新輸入。",60,"提醒")thisform.text1.setfocusendifendifthisform.text1.value=""thisform.list1.requerythisform.list1.clearthisform.list1.init&&重新顯示List列表thisform.text1.value=alltrim(thisform.list1.value)endifendifthisform.refresh4.7班級(jí)管理“增長(zhǎng)”按鈕的click事件添加如下的代碼setordertotagsetsafetyoffifalltrim(thisform.text1.value)==""messagebox("班級(jí)名為空，請(qǐng)輸入！",64,"提醒")thisform.text1.setfocuselselocatefordeandma.班級(jí)=alltrim(thisform.text1.value)if.not.eof()messagebox("班級(jí)名已經(jīng)存在，請(qǐng)重新輸入！",48,"提醒")thisform.text1.value=""thisform.text1.setfocuselselocatefordeandma.專業(yè)=alltrim(bo2.value)ifalltrim(deandma.班級(jí))==""replacedeandma.班級(jí)withalltrim(thisform.text1.value)elseappendblankreplacedeandma.系withalltrim(bo1.value)replacedeandma.專業(yè)withalltrim(bo2.value)replacedeandma.班級(jí)withalltrim(thisform.text1.value)endifthisform.text1.value=""bo2.click&&重新顯示list列表thisform.list1.value=""endif“刪除”按鈕的click事件添加如下的代碼Setsafetyoffifthis.caption=="取消"thisform.text2.value=""thisform.text2.enabled=.f.thisform.label5.enabled=.f.this.caption="刪除"mand1.enabled=.mand2.caption="修改"elseifalltrim(thisform.text1.value)==""=messagebox("缺乏完整信息，無(wú)法刪除！",0+48,"警告")thisform.text1.setfocuselseusedeandmaexclusivethisform.list1.value=alltrim(thisform.text1.value)nn=messagebox("與否確定刪除此班級(jí),與其有關(guān)的數(shù)據(jù)都將刪除！",1+48,"警告")ifnn==1t=0locateforalltrim(deandma.班級(jí))=alltrim(thisform.text1.value)deletepackt=1ift==0messagebox("將刪除的內(nèi)容不存在，請(qǐng)重新輸入。",64,"提醒")thisform.text1.setfocusendifendifthisform.text1.value=""bo2.click&&重新顯示List列表thisform.text1.value=alltrim(thisform.list1.value)endifendifthisform.refresh4.8學(xué)生成績(jī)錄入“確定”按鈕的click事件添加如下的代碼xuehao=allt(thisform.text1.value)banji=allt(bo3.value)kecheng=allt(bo4.value)xueqi=allt(bo5.value)chengji=allt(thisform.text2.value)selegradeifchengji==""tt=messagebox("想輸入單科成績(jī)嗎？",4+32,"提醒")iftt==6thisform.text2.setfocuselseendifelse*locateforallt(學(xué)號(hào))=xuehao*ifeof()locateforallt(課程)=kechengifallt(學(xué)號(hào))=="".and.allt(班級(jí))==banjirepl學(xué)號(hào)withxuehaorepl成績(jī)withval(chengji)repl學(xué)期withxueqielse*appendblank*repl學(xué)號(hào)withxuehao*repl班級(jí)withbanji*repl課程withkecheng*repl成績(jī)withval(chengji)*repl學(xué)期withxueqi*endif*elselocateforallt(學(xué)號(hào))=xuehao.and.allt(課程)==kecheng.and.allt(學(xué)期)==xueqiifeof()appendblankrepl學(xué)號(hào)withxuehaorepl班級(jí)withbanjirepl課程withkechengrepl成績(jī)withval(chengji)repl學(xué)期withxueqielsett=messagebox("該科的成績(jī)已存在，與否覆蓋？",4+32+256,"提醒")iftt==6repl成績(jī)withval(chengji)endifendifendifthisform.Cmand3.enabled=.f.endif“查詢”按鈕的click事件添加如下的代碼selelsifallt(thisform.text3.value)==""messagebox("請(qǐng)輸入學(xué)號(hào)或姓名！",64,"提醒")elselocatefor學(xué)號(hào)=allt(thisform.text3.value).or.姓名=allt(thisform.text3.value)ifeof()messagebox("該班級(jí)沒(méi)有此人??！",64,"提醒")thisform.text3.value=""thisform.text3.setfocusgonhereelsethisform.text1.value=學(xué)號(hào)endifendif4.9修改學(xué)生成績(jī)“迅速查詢”按鈕的click事件添加如下的代碼selelsbjifallt(thisform.text1.value)==""messagebox("請(qǐng)輸入學(xué)號(hào)或姓名！",16,"提醒")thisform.text1.setfocuselselocatefor學(xué)號(hào)=allt(thisform.text1.value).or.姓名=allt(thisform.text1.value)ifeof()messagebox("本班級(jí)沒(méi)有此人，請(qǐng)重新輸入！",64,"提醒")thisform.text1.value=""thisform.text1.setfocuselsexuehao=allt(學(xué)號(hào))thisform.label8.caption=姓名thisform.label9.caption=學(xué)號(hào)bo4.clickendifendif“下一位”按鈕的click事件添加如下的代碼mand2.enabled=.mand4.enabled=.t.if!allt(bo3.value)==""selelsbjskip1ifeof()this.enabled=.mand5.enabled=.f.messagebox("已經(jīng)到最終一條記錄了！",48,"提醒")gobottomendifxuehao=allt(學(xué)號(hào))thisform.label8.caption=allt(姓名)thisform.label9.caption=allt(學(xué)號(hào))4.10學(xué)生成績(jī)查詢“補(bǔ)考記錄”按鈕的click事件添加如下的代碼ifallt(bo3.value)==""messagebox("請(qǐng)選擇班級(jí)!",64,"提醒")elsebkbj=bo3.valuebkxq=bo4.valuedoformbukaoendif“定位查詢”按鈕的click事件添加如下的代碼ifallt(thisform.text1.value)==""messagebox("請(qǐng)輸入學(xué)號(hào)或姓名！",64,"提醒")thisform.text1.setfocuselselocateforallt(students.學(xué)號(hào))=allt(thisform.text1.value).or.;allt(students.姓名)=allt(thisform.text1.value)iffound()lsxh=allt(students.學(xué)號(hào))lsxm=allt(students.姓名)buxq=allt(bo4.value)doformdgcjelsemessagebox("沒(méi)有此人，請(qǐng)重新輸入",64,"提醒")endifendif4.11顧客管理List1的init事件中添加的代碼如下seleyonghuthis.additem("管理員")locatefor標(biāo)識(shí)=.T.dowhilefound()this.additem("----"+姓名)continueenddogotoplocatefor標(biāo)識(shí)=.F.this.additem("一般顧客")dowhilefound()this.additem("----"+姓名)continueenddo“注冊(cè)”按鈕的click事件添加如下的代碼Setsafetyoffseleyonghuifalltrim(thisform.text1.value)==""messagebox("顧客名不能為空！",0+48,"警告")thisform.text1.setfocuselselocatefor姓名=alltrim(thisform.text1.value)if(.not.eof())messagebox("此顧客已存在，請(qǐng)重新輸入！",64,"警告")thisform.text1.value=""thisform.text1.setfocuselseifalltrim(thisform.text2.value)==""messagebox("密碼不能為空！",0+48,"警告")thisform.text2.setfocuselseif(thisform.text2.value)==(thisform.text3.value)appendblankrepl姓名withalltrim(thisform.text1.value),;密碼withalltrim(thisform.text2.value)ifthisform.check1.value==1repl標(biāo)識(shí)with.T.elserepl標(biāo)識(shí)with.F.endifthisform.text1.value=""thisform.text2.value=""thisform.text3.value=""thisform.text1.setfocusthisform.text3.enabled=.f.thisform.label4.enabled=.f.thisform.list1.clearthisform.list1.initelsett=messagebox("確認(rèn)密碼錯(cuò)誤，請(qǐng)重新輸入！",0+48,"警告")iftt==1thisform.text3.enabled=.t.thisform.label4.enabled=.t.thisform.text3.value=""thisform.text3.setfocusendifendifendifendifendif“刪除”按鈕的click事件添加如下的代碼ifallt(thisform.text1.value)==""messagebox("請(qǐng)選擇或輸入顧客名",64,"提醒")thisform.text1.setfocuselseuseyonghulocatefor姓名=allt(thisform.text1.value);.and.密碼=allt(thisform.text2.value)ifeof()messagebox("請(qǐng)選擇或輸入對(duì)的的顧客名",64,"提醒")thisform.text1.value=""thisform.text2.value=""thisform.text1.setfocuselsett=messagebox("一定要?jiǎng)h除嗎？",4+48,"刪除確認(rèn)")iftt==6deletepackendifthisform.list1.clearthisform.list1.initthisform.list1.clickendifendif4.12修改顧客密碼“修改”按鈕的click事件添加如下的代碼seleyonghuifallt(thisform.text1.value)==""thisform.text1.setfocuselselocateforallt(姓名)=allt(thisform.text1.value)ifeof()messagebox("此顧客不存在，請(qǐng)重新輸入！",64,"提醒")thisform.text1.value=""thisform.text1.setfocus()elseif!all