版權(quán)說明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)
文檔簡(jiǎn)介
交通與汽車工程學(xué)院課程設(shè)計(jì)說明書課程名稱:計(jì)算機(jī)應(yīng)用基礎(chǔ)課程設(shè)計(jì)課程代碼:6011339題目:汽車零部件查詢系統(tǒng)設(shè)計(jì)年級(jí)/專業(yè)/班:學(xué)生姓名:學(xué)號(hào):開始時(shí)間:2023年4月1日完成時(shí)間:2023年4月12日課程設(shè)計(jì)成績(jī):舟學(xué)習(xí)態(tài)度及塵平時(shí)成績(jī)(根30)嘴技術(shù)水平與午實(shí)際能力(今20)繭創(chuàng)新(5)眠說明書(計(jì)陪算書、圖紙刻、分析報(bào)告最)撰寫質(zhì)量奴(45)舉總分(1吵00)指導(dǎo)教師簽名:年月日槐目錄塑豆摘要昨……………責(zé)……………鴿……………財(cái)……………腳……………嗓……………蒼…譯……油…婚1芒1識(shí)引言傭……………受……………竟……………夏……………天……………加……………巧…滾……礙…己2笨方案設(shè)計(jì)使……………和……………襖……………城……………圾……………華……………充…車2.汽車零爬部件查詢模番擬系統(tǒng)方案榮設(shè)計(jì)免……………擾……………記……………賓…………指…東5語渾系統(tǒng)功能描燈述磚……………惱……………喝……………航……………手……………鈔……供5決掛系統(tǒng)結(jié)構(gòu)分頭析夸……………芽……………狼……………蠶……………高……………暫……停5驚溪系統(tǒng)流程分踏析步……………詳……………件……………欄……………曉……………虎……矮5溪2.2程序擁界面和代碼洋設(shè)計(jì)光……………效……………鍬……桿……………下……………慕………列6霜貴系統(tǒng)工程設(shè)用計(jì)框架毯……………弟……………啟……………創(chuàng)……………渡…………燈…由6徑牽系統(tǒng)各界面挨設(shè)計(jì)及代碼舅設(shè)計(jì)馬……………同……………階……………乳……………到…奪8剖3結(jié)果分爐析惑……………鎖……………淚……………惠……………判……………敘……………即33駕結(jié)論哀……………戚……………外……………濃……………葵……………曬……………田………蹦45洪致謝廈……………透……………慕……………螞……………嚇……………乘……………歇………向46恐參考文獻(xiàn)暈……………翠……………本……………珠……………寄……………謹(jǐn)……………央…鏈47摘要連隨著計(jì)算機(jī)商的普及拐,糖計(jì)算機(jī)高級(jí)飯語言已經(jīng)運(yùn)倡用到生活中創(chuàng)的各個(gè)方面刮,本次課程五設(shè)計(jì)使用V丟B語言作為堤開發(fā)工具,夏進(jìn)行了汽車治零部件查詢查系統(tǒng)的程序俊設(shè)計(jì),該程揮序能實(shí)現(xiàn)汽包車零部件查疏詢模擬功能撈,進(jìn)行汽車洲零部件的查灘詢,修改,炭添加等操作茫,查詢結(jié)果沫簡(jiǎn)便明了,促運(yùn)行界面清鑰晰實(shí)用,操綢作方便,易勿于實(shí)際處理溪。貨關(guān)鍵詞:桑網(wǎng)絡(luò)化襪計(jì)算機(jī)輕對(duì)策景VB語親言汽車零旗部件查愧詢程煉序亮瓣1菊引言壽授1均.歸1問題的丸提出暢隨著計(jì)算機(jī)巨的普及,網(wǎng)威絡(luò)進(jìn)入大眾絕的家庭抄。鹿VB一種可悲視化的、面內(nèi)向?qū)ο蠛筒蛇f用事件驅(qū)動(dòng)恭方式的高級(jí)撇程序設(shè)計(jì)語獵言,可用于山開發(fā)Win膚dows環(huán)呆境下的各類笨應(yīng)用程序。兄本次課程設(shè)跡計(jì)主要內(nèi)容拒就是使用V光B編制簡(jiǎn)單蜂、實(shí)用的小灑程序,以鞏陡固我們所學(xué)按的計(jì)算機(jī)V負(fù)B語言知識(shí)思,提高分析網(wǎng)問題和解決評(píng)問題的能力券,鍛煉我們席獨(dú)立動(dòng)手的懸能力。飯1.唇2鬧任務(wù)與分析他攪本課題主要卸的目的是為術(shù)了檢測(cè)步進(jìn)途電機(jī)步距角惕誤差,并把籃誤差進(jìn)行分考析計(jì)算,最蒜終得到一份面誤差數(shù)據(jù),施用誤差曲線逗的方式在坐役標(biāo)上面把誤額差和步數(shù)結(jié)鋼果表現(xiàn)出來諸,方便日后欠對(duì)誤差的分販析、誤差的慧減少討論出杯相應(yīng)的方案掀…霜2共設(shè)計(jì)方案豐首先根據(jù)題層目要求設(shè)計(jì)徑合理界面,閘確定哪些控助件會(huì)用到,健要考慮到操添作的方便性惠和美觀性。多再按題目的姿功能要求編霜寫對(duì)象的事乘件代碼,并皂其逐一進(jìn)行房調(diào)試和修改俊。購(gòu)…念2缺.1系統(tǒng)總居體方案的設(shè)擊計(jì)蝶城2明.1.1系腸統(tǒng)的驅(qū)動(dòng)控岔制方案設(shè)計(jì)按開根據(jù)設(shè)計(jì)要貓求,程序要應(yīng)達(dá)到的功能炭如下:赴(1額)、用隨機(jī)票文件建立汽吸車零部件和牌管理員的信摧息檔案;們(2甚)、讀出汽鬼車零部件的六信息,顯示棕在列表框中撞;賊(3草)、能實(shí)現(xiàn)桌汽車零部件偏及管理員的秘信息的查詢?cè)#薷模砭醇樱瑒h除等幅操作;亭(4肯)、對(duì)汽車屈零部件搜索奴。李遭系統(tǒng)結(jié)構(gòu)分晌析斑根據(jù)上面對(duì)拾系統(tǒng)功能的堅(jiān)描述,構(gòu)建泉出系統(tǒng)的總創(chuàng)體功能結(jié)構(gòu)障圖,如圖1曲所示厲蒜泳雀令鋪汽車零部件查詢系統(tǒng)對(duì)汽車零部件信息的維護(hù)汽車零部件查詢系統(tǒng)對(duì)汽車零部件信息的維護(hù)對(duì)汽車零部件搜索對(duì)汽車零部件的查詢使用說明件圖1弊么系統(tǒng)的總體危功能結(jié)構(gòu)圖姐看系統(tǒng)流程分閱析良腦本系統(tǒng)運(yùn)行殘后從歡迎(鐘登錄)界面纏進(jìn)入主界面掃。程序的主闊要工作流程鼠圖如圖2所償示清。進(jìn)烏匆用戶登錄用戶登錄讀取用戶數(shù)據(jù)并登錄開始失敗重試3次操作主界面(1).卡片式(2).列表框式查詢零件精確或粗略搜索搜索零件1.添加數(shù)據(jù)2.刪除數(shù)據(jù)3.修改數(shù)據(jù)1.添加數(shù)據(jù)2.刪除數(shù)據(jù)3.修改數(shù)據(jù)毛粉進(jìn)三錘蜂圖2系統(tǒng)主喂要流程圖疤2.2程序牛界面和代碼撞設(shè)計(jì)烈江系統(tǒng)工程設(shè)習(xí)計(jì)框架厚在設(shè)計(jì)程序枕之前,應(yīng)先廁布局整個(gè)工搬程抽。澤本系統(tǒng)可設(shè)稱立一個(gè)工程繭文件,取名偽汽車零部件做查詢系統(tǒng).淋vbp,該刪工程中包括雞1個(gè)模塊文暢件,11個(gè)參窗體文件,潑如圖寨3測(cè)所示。燭圖典3工程內(nèi)容圓良模塊代碼如腸下:弊臣Dimh益Type橡qiche護(hù)pjAs兔Stri憲ng*賄10夏ljxh更AsSt雪ring盛*10卵sych水AsSt東ring潛*10史jgAs面Stri葛ng*雁10噴fbAs肺Stri線ng*犁10戚rqAs啊Stri問ng*幸10騾dwAs童Stri怖ng*心10料EndT你ype家Dimc沫arsA胖sqic棄he坡Type媽manag被er莊bhAs摔Stri慘ng蜜*10谷xbAs舅Vari猜ant傅xmAs守Vari忌ant耽mmAs湯Stri燈ng*荷10洽EndT聾ype漂Dimp刷ersA拖sman喬ager似Subs萄a(bǔ)ve()晴Kill者App.P擇ath+完"\ma睬g.dat泛"盼Open球App.P擱ath+敢"\ma位g.dat民"For樸Rand零omAs前#1男Fori致=0碗ToFo廟rm4.L析ist1.初ListC桌ount倒-1串pers.嘴bh=真Form4功.List滅1.Lis隱t(i)砌pers.欺xb=衰Form4位.List助2.Lis喪t(i)斯pers.顯xm=泰Form4閘.List毀3.Lis仆t(i)銷pers.練mm=顆Form4臨.List掘4.Lis抽t(i)斜Put#濃1,i書+1,豐pers蚊Next芝iClose詞EndS社ub澆Subx艦ishi(蘿p)院Form1擾0.Tex釘t5(0)針=""三Form1碌0.Tex雁t5(1)倡=""組Form1抄0.Tex躁t5(2)扣=""楚Form1猛0.Tex陣t5(3)湊=""董Form1縫0.Tex說t5(4)倍=""給Form1低0.Tex畜t5(5)憤=""定Form1擱0.Tex虹t5(0)枕=Fo宴rm12.孕List1笑(0).L崇ist(p摧)顆Form1晌0.Tex漠t5(1)襲=Fo抖rm12.傭List1紛(1).L同ist(p具)娘Form1蓋0.Tex劑t5(2)迷=Fo鋪rm12.腦List1鏈(2).L短ist(p綱)縫Form1涼0.Tex浙t5(3)覆=Fo氧rm12.夢(mèng)List1疏(3).L植ist(p悼)風(fēng)Form1質(zhì)0.Tex尸t5(4)赴=Fo瘡rm12.棋List1述(4).L寄ist(p旬)蕩Form1茅0.Tex暮t5(5)冰=Fo億rm12.嫂List1盲(5).L晌ist(p誕)這EndS謎ub做丘系統(tǒng)各界辟面設(shè)計(jì)載根據(jù)功能不燥同,在本系象統(tǒng)中設(shè)計(jì)了朗11顆個(gè)窗體。歡迎界面荷歡迎界面的特主要功能是坦讓用戶了解渾程序軟件的害用途登(2)彩用戶登錄界輩面姑用戶登錄界筍面的功能是幟讓管理員進(jìn)懷入系統(tǒng),防首止非工作人桂員進(jìn)入。夾用戶登錄主衡界面如圖5胃所示摟圖滾5登錄系界面飯登錄頁面主蔥要代碼如下諒:士Dimp鳴ersA意sman恢ager怨Priva做teSu指bCom繭mand1暫_Clic幼k()房'中登錄系統(tǒng)按只鈕認(rèn)Stati傍ctA臂sInt包eger擇f=F閑alse蓋IfTe秤xt2.T蟻ext=諸""O狗rTex伙t1=鋤""T范hen折MsgBo裝x"請(qǐng)?zhí)罘蕦懲暾膫€(gè)椅人信息"罩EndI濫f裂IfTe拋xt2.T移ext<辜>""低Then僻Open患App.P肌ath+截"\ma侮g.dat瀉"For似Rand策omAs剖#1看n=L屬OF(1)相/Le吃n(per遣s)憑DoWh戰(zhàn)ileN拼otEO事F(1)閥Get#梳1,,俊pers憤IfTr語im(Te求xt2.T僻ext)豬=Tri戀m(per評(píng)s.bh)是Then押f=T吧rue黨Form3飲.Show餅Unloa資dFor希m2底Exit舟Do雖EndI諸fLoopClose禁Iff烘=Fal堤seTh香en疑t=t衰+1絨Ift腳<3T燃hen桑MsgBo染x"用戶捧不存在,請(qǐng)洪重新輸入!庭",vb爺OKOnl返y+v閣bInfo技rmati法on,"賞用戶名錯(cuò)誤駐"Else唯MsgBo丙x"重試?yán)浯螖?shù)已到,饞即將退出本緞系統(tǒng)!",挨vbOK藍(lán)Only睛+vbE柔xclam鏟ation睬,"用戶拿名錯(cuò)誤"End歡Exit無Sub脾EndI謀f蠢EndI終f激EndI跑f鞠EndS膽ub壤Priva省teSu于bCom軋mand2末_Clic聚k()查'結(jié)束炎按鈕End第EndS衰ub端(3)數(shù)主界面碑一幅如圖機(jī)6所示麻主界面的功跟能是展示出炕系統(tǒng)軟件的丙功能,使用綠戶一目了然阿。壟狠拐宇梢偏朱畜我戰(zhàn)涼眾險(xiǎn)錯(cuò)濁圖6主界另面椒主要代碼如銹下:投Dimc晉arsA果sqic閱he普’征通用定義代恐碼勤Dima板(5)耽Priva臉teSu更bFor機(jī)m_Loa像d()跨F孝rame1章.Visi吹ble=別Fals胳e蘭List2墻.Visi掃ble=鉤Fals謊e挽EndS游ub侮P(guān)riva饞teSu沒b影bz_Cl害ick()堵姑’把查看系統(tǒng)幫皺助胞Form9灘.Show皮EndS制ub嘴Priva朱teSu診bss_踩Click查()涂避‘潛搜索零件庭List2扮.Visi周ble=惱True針Frame禾1.Vis歷ible敲=Tru孟e線List2出.Visi根ble=與Not瘡List2宮.Visi磁ble療List2點(diǎn).Clea進(jìn)r寇EndS持ub鋪Priva震teSu袍bCom滑mand1搜_Clic嫌k()寧稈’獸依照零件信輪息對(duì)零件搜再索乎Fori蚊=0排To4伸IfCo專mbo1(楊i).Te份xt=運(yùn)""Th渡en志Forj睛=0金ToFo議rm12.絮List1摩(i).L避istCo圍unt-族1昨List3什(i).A沿ddIte抖mFor犁m12.L飛ist1(鋼i).Li聽st(j)拐Next嗎jElset=i針Call每hunt(扎t)摩EndI根f滋N(yùn)ext章i亂IfTe更xt1<兇>""抗AndT系ext2香<>""炊Then之Call交hunt2遵ElseI廚fTex牽t1=房""An乘dTex源t2<>送""T耀henT帝ext1期=0:購(gòu)Call籌hunt2懸ElseI及fTex克t1<>也""A悄ndTe哪xt2=土""T霸henT聚ext2廣=10痕^10:量Call掏hunt徑2Else閥Forj麥=0洽ToFo綿rm12.帳List1買(5).L土istCo斃unt-傻1眾List3剖(5).A易ddIte促mFor勢(shì)m12.L拿ist1(盛5).Li娛st(j)鞋Next俘j無EndI雷f骨Fork品=0鋒To5爛m=冰List3禿(k).L拖istCo止unt襖For斬j=0花Tom找IfL扯ist3(鉛k).Li陸st(j)癥<>"完"The獅n份a(k)危=a(終k)+扎1止End吉If辱Next肺j閱Next信k鉤Max=遍a(0)尖Fori這=1哀To5將Ifa(圣i)>目MaxT排hen敲Max=爺a(i)易EndI食f識(shí)Next桑i蒙Fork瓦=0臺(tái)ToVa竹l(Max拌)盈IfLi岔st3(0蜂).Lis暑t(k)酬<>""復(fù)And滅List3度(1).L序ist(k爪)<>斥""An忙dLis怠t3(2)鐵.List垂(k)<佛>""焰AndL旋ist3(掘3).Li濁st(k)禍<>"猛"And兼List蕩3(4).咐List(粉k)<>緣""A奏ndLi鍛st3(5泛).Lis影t(k)瓦<>""為Then截List2慢.AddI礙temL際ist3(承0).Li情st(k)遙&Li秋st3(1壘).Lis贏t(k)猴&Lis慘t3(2)她.List施(k)&幻List謎3(3).駝List(焰k)&距List3昆(4).L嚴(yán)ist(k濁)&L短ist3(辱5).Li效st(k)沾EndI口f味Next呼k負(fù)Frame質(zhì)1.Vis都ible泰=Fal葵se紀(jì)List2嗓.Visi譜ble=孕True纏EndS恩ub擴(kuò)Subh聯(lián)unt(t寬)尾Fori忍=0敘ToFo聽rm12.搭List1目(t).L音istCo車unt-織1消IfTr趴im(Co轟mbo1(增t).Te抖xt)=俯Trim零(Form斜12.Li松st1(t厭).Lis親t(i))辮Then腥List3腎(t).A司ddIte矮mFor席m12.L太ist1(吐t).Li鑰st(i)安,iElse駝List3劉(t).A煩ddIte禾m"",糕i兔EndI璃f唐Next籮i緩EndS尼ub校Subh佛unt2(冒)舍Fori桃=0勺ToLi扮st1(5董).Lis化tCoun塘t-1伍IfVa咬l(Tex織t1)<山Val(瀉List1霉(5).L夜ist(i圖))An臣dVal文(Text依2)>宮Val(L呈ist1(嘗5).Li層st(i)驢)The稻n亦List3爹(5).A麗ddIte雞mLis初t1(5)克.List囑(i),快iElse蒜List3藏(5).A溝ddIte粱m"",穩(wěn)i包EndI襪f勉Next超i欺EndS王ub疤Priva故teSu混bCom獅mand2暖_Clic義k()牧論‘啄退出搜索零輪部件候Frame柔1.Vis弦ible恥=Fal攜se勻EndS鼻ub扒Priva丘teSu疲bgls現(xiàn)j_Cli災(zāi)ck()弱卡‘涉打開管理員叼數(shù)據(jù)管理功具能襲Form4猶.Show汗EndS補(bǔ)ub錄Priva攻teSu夏bbk_外Click帶()頁漲‘瞧表框式查詢?yōu)V零部件旬Form1選0.Sho喊w辰Form1姑0.Fra榆me1.V勢(shì)isibl術(shù)e=T悟rue氏EndS旋ub舞Priva象teSu跨bkp_怕Click難()襲乖‘承卡片式查詢性零部件介Form1勵(lì)0.Sho鋤w企Form1刷0.Fra趁me2.V礎(chǔ)isibl暴e林=Tru優(yōu)e樹EndS羨ub效Priva把teSu青bljg曠l_Cli衰ck()儉株‘?dāng)[打開零部件案數(shù)據(jù)管理功夾能呀Form1箱2.Sho岡w星EndS援ub透Priva宋teSu楚btc_抖Click午()柏踏‘傾退出系統(tǒng)End挖EndS絨ub去(4下)樂主界面毫二圣如圖拘7義所示盛怖膠葡沖圣饒續(xù)飯圖栗7縫主界面田主要代碼如歡下全:駱1.卡片式摘零件查詢:Dimq膝(1).查稍看上一個(gè)零醒件的代碼如雖下:初Priva倉(cāng)teSu隙bCom慮mand1鉆_Clic厭k()權(quán)Stat紙icq賤AsIn列teger甜Ifq貸=-1漲Then火q=L摩ist2.高ListC樸ount框-1夏p=V估al(Li棄st2.L窩ist(q漢))揮Call唇xishi革(p)凱q=q昌-1續(xù)EndS主ub弟(2)查看婚下一個(gè)零件衰代碼如下:銀Priva姐teSu鞭bCom尾mand2歉_Clic氣k()鴉Stati蘿cqA雕sInt扮eger擊Ifq禿>Lis尤t2.Li兩stCou洪nt-捏1The尊nq=泉0暖p=V推al(Li懂st2.L零ist(q塔))秀Call因xishi子(p)演q=q曉+1臘Comma秋nd1.E屋nable貧d=T裁rue桌EndS褲ub扇(3)退出宿卡片式查詢車代碼如下:雅Priva夏teSu楚bCom毀mand3于_Clic世k()倘Form3仗.Show榴Unloa習(xí)dMe杯EndS扛ub零(4)查看梳第一個(gè)零件謙代碼如下:謝Priva判teSu書bCom味mand4現(xiàn)_Clic遙k()妖p=V巡al(Li庫(kù)st2.L加ist(0肌))巾Call山xishi榨(p)辣EndS夠ub壤(5)查看唇最后一個(gè)零系件代碼如下馳:管Priva由teSu他bCom讓mand5懶_Clic搭k()腐p=V艙al搏(List舉2.Lis毒t(Lis儲(chǔ)t2.Li堆stCou勵(lì)nt-炸1))遵Call呈xishi迷(p)舒EndS點(diǎn)ub浸(6)卡片鉗式配件框發(fā)鼠生改變代碼煤如下:激Priva憂teSu敵bTex電t3_Ch愚ange(燦)針List2隊(duì).Clea聚r遮Fori武=0暢ToFo磨rm12.住List1遠(yuǎn)(0).L嫌istCo半unt-盛1布IfTe爸xt3<刊>""堪AndT堤ext4樹=""參Then運(yùn)IfTr銹im(Te巷xt3)佩=Tri蜂m(For外m12.L堤ist1(鋤0).Li勵(lì)st(i)菊)The戲n輔List2撤.AddI榨t屬emi質(zhì)EndI謹(jǐn)f朱EndI沙f盆IfTe遼xt3<辮>""磨AndT拔ext4支<>""施Then獄IfTr博im(Fo南rm12.隆List1灑(0).L塊ist(i蚊))=峽Trim(崗Text3難)And憂Trim失(Form恒12.Li聾st1(1毯).Lis瘡t(i))催=Tr同im(Te查xt4)德Then象List2鞠.AddI劑temi狐EndI嬌f墻EndI螞f乏Next蓬i百IfLi低st2.L夢(mèng)istCo串unt>銀0Th辭en沒List2絞.List芳Index詳=0蓬p=V往al(Li蟲st2.T育ext)揚(yáng)Call芳xishi波(p)Else譯Text5陡(0)=喂""養(yǎng)Text5絨(1)=重""永Text5鴨(2)=均""破Text5猜(3)=磨""源Text5長(zhǎng)(4)=倆""紅Text5矩(5)=慨""妹EndI挽f揚(yáng)IfLi刃st2.L釣istCo稈unt>舟1Th導(dǎo)enCo陸mmand賭2.Ena戰(zhàn)bled志=Tru怠e招EndS抹ub駱(7)卡片固式零件型號(hào)繡框發(fā)生改變役代碼如下:則Priva令teSu友bTex守t4_Ch垃ange(險(xiǎn))座List2菌.Clea舌r盞Fori喝=0滑ToFo浪rm12.傻List1妨(0).L俘istCo吵unt-巧1編IfTe易xt4<幟>""許AndT重ext3田=""恥Then嗓IfTr漂im(Te狀xt4)舉=Tri岸m(For桿m12.L佛ist1(潑1).Li塌st(i)白)The李n厘List2廢.AddI朋temi玩EndI可f袖EndI遼f響IfTe點(diǎn)xt3<臣>""以AndT零ext4遭<>""權(quán)Then散IfTr蔬im(Fo尤rm12.稻List1舅(0).L灣ist(i供))=應(yīng)Trim(尾Text3以)And蒙Trim次(Form曾12.Li稿st1(1呢).Lis功t(i))言=Tr務(wù)im(Te票xt4)送Then頭List2炊.AddI挖temi提EndI食f姜EndI爸f垮Next楊i率IfLi膊st2.L念istCo稿unt>旨0Th糕en違List2伴.List低Index濁=0扮p=V架al(Li遭st2.T挽ext)門Call凡xishi哨(p)Else啟Text5啟(0)=港""屯Text5纏(1)=牙""岡Text5菊(2)=衣""套Text5顧(3)=老""滋Text5教(4)=勝""防Text5忽(5)=脖""冬EndI探f燈IfLi腥st2.L藍(lán)istCo侄unt>奧1Th梯enCo艙mmand際2.Ena皺bled非=Tru蔑e段EndS鬼ub桿2.晝列表框式零禍件查詢:萄(1葵)師列表框式配左件框發(fā)生改沿變代碼如下慢:美Priva謎teSu冤bTex漫t1_Ch筍ange(廉)自List1軍.Clea粘r餓List1評(píng).AddI賽tem"踢配件"&凱""也&"枯"&"扭零件型號(hào)"攏&"扁"&"共"&壁"適用車型逼"&"圓"&而""&寄""匆&""仔&"發(fā)漆布日期"當(dāng)&""濕&"鎖"&"壞"&壞"單位"法&""翼&"宵"&"咱"&犯""&截""慕&"價(jià)格叉"增Fori載=0去ToFo涌rm12.株List1根(0)似.List腳Count祥-1驗(yàn)IfTe悼xt1<鵲>""器AndT鮮ext2蓄=""才Then盟IfTr顧im(Fo和rm12.解List1充(0).L炎ist(i頁))=魚Trim(才Text1埋)The粥n椒List1糟.AddI折temF猶orm12扁.List伴1(0).侮List(謹(jǐn)i)&漂Form1乳2.Lis度t1(1)述.List野(i)&販Form賣12.Li透st1(2役).Lis辯t(i)愧&For貝m12.L巧ist1(甩3).Li貿(mào)st(i)須&Fo援rm12.誠(chéng)List1行(4).L旬ist(i榜)&F腸orm12革.List爹1(5).旅List(支i)算EndI幣f院EndI拍f事IfTe辟xt1<英>""萄AndT喉ext2亡<>""配Then儉IfTr睡im(Fo灘rm12.陷List1么(0).L直ist(i打))=訊Trim(妙Text1抽)And胖Trim吼(Form謊12.Li拿st1(1媽).Lis珠t(i))冬=Tr勢(shì)im(Te嫁xt2)隊(duì)Then沾List1欄.AddI殖temF朽orm12于.List秀1(0).鐘List(擾i)&倍Form1銜2.Lis島t1(1)族.List研(i)&瓶Form廁12.Li副st1(2育).Lis荷t(i)車&勢(shì)Form1冰2.Lis駛t1(3)偵.List弱(i)&覺Form暈12.Li預(yù)st1(4限).Lis亭t(i)記&For元m12.L紋ist1(閥5).Li沒st(i)洲EndI六f尾EndI斃f倉(cāng)Next糟i蔬EndS握ub鄙(2)列表趣框式零件型游號(hào)框發(fā)生改嶄變代碼如下朱:約Priva條teSu駛bTex忌t2_Ch斷ange(敲)然List1塌.Clea總r裹List1株.AddI擺tem"栽配件"&瞞""淘&"冷"&"梁零件型號(hào)"散&"掛"&"廳"&純"適用車型梅"&"振"&燭""&泳""應(yīng)&""紹&"發(fā)廈布日期"擴(kuò)&""木&"聚"&"矮"&澤"單位"晃&""詢&"演"&"附"&鑰""&遲""午&"價(jià)格棚"爛Fori滑=0淋ToFo皇rm12.露List1綁(0).L慘istCo花unt-險(xiǎn)1霉IfTe鋒xt1=絮""A比ndTe醋xt2<即>""除Then粗IfTr養(yǎng)im(Fo黨rm12.隆List1亭(1).L伏ist(i囑))=怒Trim(槐Text2網(wǎng))The碌n緒List1星.AddI靠temF翻orm12唱.List京1(0).顛List(區(qū)i)&翼Form1定2.Lis另t1(1)紫.Li盼st(i)濫&Fo漸rm12.賤List1臉(2).L敢ist(i向)&F廊orm12殿.List靜1(3).冷List(照i)&內(nèi)Form1塑2.Lis盼t1(4)激.List層(i)&怠Form互12.Li牽st1(5設(shè)).Lis扎t(i)站EndI償f疤EndI末f蹦IfTe遭xt1<撇>""佩AndT欠ext2浩<>""斷Then鑄If蔑仍Trim(池Form1舊2.Lis勺t1(0)龜.List蠶(i))笑=Tri徑m(Tex鄭t1)A除ndTr富im(Fo落rm12.加List1牙(1).L緒ist(i警))=聲Trim(燭Text2瞞)The睬n功List1占.AddI暗temF船orm12譯.List長(zhǎng)1(0).命List(多i)&塞Form1掀2.Lis步t1(1)行.List愿(i)&梅Form疏12.Li箱st1(2聰).Lis鬧t(i)滲&For征m12.L見ist1(客3).Li瓜st(i)暖&Fo給rm12.養(yǎng)List1梢(4).L港ist(i霜)&F豆orm12主.List斥1(5).池List(吸i)磚EndI鏈f觸EndI西f介Next美i叼EndS序ub觸(5炮)左主界面汽三前如圖翼8現(xiàn)所示宜摸豐蒼記甘甲圖否8桑主界面低稍主要代碼如苗下:畏Dimc子arsA魔sqic慌he芽流‘巷通用代碼模Dima桿(5)屈(1)修改勝零件代碼如債下:鏟Priva爭(zhēng)teSu唉bCom特mand1班_Clic榨k()俯IfLi葛st1(0缸).Tex瓶t="焰"The郊n蝴MsgBo千x"請(qǐng)選暑擇要修改的罰零件"Else赴Form7壺.Show艱Form7糞.Text楊1=L設(shè)ist1(畏0).Te庫(kù)xt君Form7致.Text肚2=L總ist1(朱1).Te付xt侮F俊orm7.伙Text3篩=Li兆st1(2羞).Tex贊t向Form7儉.Text習(xí)4=L邁ist1(屢3).Te徒xt乞Form7纖.Text虎5=L圓ist1(路4).Te稿xt桿Form7比.Text構(gòu)6=L冒ist1(海5).Te亮xt豆List1亞(0).R關(guān)emove開Item餅List1衣(0).L鹿istIn掉dex柿List1很(1).R腦emove展Item茶List1有(1).L怨istIn轟dex險(xiǎn)List1零(2).R甘emove菠Item相List1邪(2).L柴istIn霉dex忍List1侵(3).R閱emove歸Item低List1抱(3).L喂istIn咳dex瞎List1臘(4).R議emove擔(dān)Item趨List1品(4).L桂istIn達(dá)dex捉List1描(5).R先emove渠Item挪List1焦(5).L伴istIn騰dex丑EndI盾f遣EndS襲ub濃(2)添加哲零部件代碼防如下:幕Priva墳teSu屯bCom愛mand2碎_Clic稱k()乓Form8酬.Show凡EndS雀ub禾(3)刪除青零部件代碼然如下:羊Priva擱teSu屬bCom畢mand3竟_Clic回k()慘List1寺(0).R苦emove短Item該List1嗚(0).L艱istIn珠dex碑List1父(1).R駱emove訓(xùn)Item徐List1縮(1).L鄉(xiāng)istIn隆dex圣List1它(2).R支emove印Item哭List1業(yè)(2).L菌istIn溪dex攜List1歌(3).R塔emove錄Item原List1愧(3).L遭ist型Index輔List1傍(4).R擠emove羅Item禮List1個(gè)(4).L己istIn漢dex宿List1做(5).R肢emove隨Item列List1讓(5).L必istIn包dex判EndS僅ub爺(3)退出趁零部件查詢甚系統(tǒng)代碼如游下:腥Priva激teSu匠bCom勢(shì)mand4恰_Clic生k()逆Form3牲.Show鞭Unloa取dMe仗EndS閃ub險(xiǎn)(4)打開他窗體運(yùn)行代疫碼如下:貨Priva鄙teSu胡bFor俊m_Loa漆d()退Open叫App.P婦ath+鳳"\ca易r.dat潮"For酸Rand螺omAs追#2生DoWh戰(zhàn)ileN鮮otEO成F(2)鼻i=i辣+1芬Get#椒2,i,豎cars葡List1捏(0).A運(yùn)ddIte鼻mcar砌s.pj好List1般(1).A礙ddIte誰mcar中s.ljx孕h祥L(zhǎng)ist1狐(2).A挽ddIte命mcar辜s.syc穴h疑List1葬(3).A味ddIte俱mcar包s.fb予List1許(4).A雕ddIte法mcar萌s.dw號(hào)List1血(5).A格ddIte士mcar餓s.jgLoopClose飯EndS丟ub暢Priva拴teSu籌bLis哲t1_Cl州ick(I勒ndex瘦AsIn賠teger遠(yuǎn))疑行‘慧點(diǎn)擊零部件燥顯示屬性余Selec梯tCas觸eInd墾ex緣Case就0為L(zhǎng)ist1根(5).L逐istIn賠dex=醫(yī)List測(cè)1(0).巷L(fēng)istI姐ndex狐List1須(4).L槽istIn幼dex=要List這1(0).袖ListI鄭ndex混List1生(3).L肅istIn箏dex=腥List竟1(0).把ListI腦ndex擔(dān)List1妙(2).L粒istIn貿(mào)dex=滑List洽1(0).姿ListI對(duì)ndex槍List1巖(1).L躍istIn相dex=猾List彩1(0).杠ListI松ndex悼Case臭1休List1魂(5).L香istIn越dex=皮List福1(1).元ListI濁ndex硬List1帖(4).L口istIn岡dex=熄List爛1(1).嘗ListI傭ndex箱List1詠(3).L寬istIn宮dex=寇List丑1(1).間ListI吉ndex放List1楚(2).L蠟istIn腐dex=堵List把1(1).毀ListI鞏ndex化List1窯(0).L士istIn寒dex=末List躲1(1).巧ListI含ndex具Case壁2諒List1研(5).L償istIn孫dex=閘List確1(2).濕ListI螞ndex翠List1容(4).L睡istIn進(jìn)dex=雹List療1(2).歸ListI根ndex協(xié)List1鉛(3).L杰istIn塊dex=肌List谷1(2).罩ListI燥ndex子List1炮(0).L式istIn撤dex=君List母1(2).懂ListI課ndex敘List1黃(1).L盤istIn負(fù)dex=前List產(chǎn)1(2).池ListI博ndex皂Case搶3塑List1券(5).L衛(wèi)istIn勤dex=盲List動(dòng)1(3).椒ListI析ndex燙List1聲(4).L貞istIn再dex=稅List攪1(3).鄙ListI夕ndex住List1退(0).L背istIn停dex=伙L(fēng)ist暈1(3).芹ListI減ndex繩List1安(2).L坐istIn博dex=匠List菜1(3).井ListI饑ndex主List1出(1).L含istIn夕dex=猾List士1(3).靠ListI醋ndex勻Case煎4獎(jiǎng)List1際(5).L氣istIn戶dex=踩List吳1(4).漲ListI禮ndex塘List1求(0).L碌istIn穿dex=斗List塞1(4).磚ListI燥ndex夕List1掉(3).L淹istIn芝dex=返List拉1(4).溉ListI譯ndex俘List1對(duì)(2).L砌istIn拳dex=放List劃1(4).創(chuàng)ListI墓ndex消List1艘(1).L劣istIn鄉(xiāng)dex=腿List鳴1(4).誼ListI余ndex財(cái)Case港5舌List1唇(0).L存istIn宜dex=煌List蒜1(5).臉ListI狀ndex桿List1嘴(4).L嶺istIn蠅dex=臟List期1(5).島ListI劈ndex炕List1妻(3).L迷istIn輸dex=慎List源1(5).簽ListI外ndex弱List1睛(2).L舌istIn溉dex=雨List盆1(5).鄙ListI廈ndex萬List1密(1).L稿istIn先dex=暴List殃1(5).歇ListI駝ndex牲EndS短elect窩EndS香ub殖(6)遭主界面躁四深如圖準(zhǔn)9悉所示客司故舍懼采膜窯圖且9父主界面拔主要代碼如困下拿:半(1)添加炒零部件代碼箏如下:列Priva占teSu習(xí)bCom塑mand1月_Clic孫k()挎IfCo健mbo1(封0).Te桑xt<>負(fù)""A繪ndCo往mbo1(扶1).Te緣xt<>襲""A損ndCo笛mbo1(牲2).Te很xt<>酸""A敞ndCo記mbo1(乏3).Te弦xt<>獅""A場(chǎng)ndCo剛mbo1(繼4).Te須xt<>止""A往ndTe用xt1<痰>""壓Then渴Form3幕.List播1(0).縫AddIt圈emCo源mbo1(務(wù)0).Te票xt脾Form3對(duì).List襯1(1).墨AddIt斯emCo照mbo1(符1).Te下xt指Form3產(chǎn).List勇1(2).菌AddIt并emCo氧mbo1(啦2).Te肚xt撲Form3昌.List紀(jì)1(3).洗AddIt餃emCo裳mbo1(沙3).Te的xt強(qiáng)Form3她.List杯1(4).姜AddIt泥emCo姑mbo1(崖4).Te認(rèn)xt鍬Form3票.List霸1(5).鐘AddIt剝emTe隊(duì)xt1紫Call騰save2商Form3住.Show劈Unloa灘dMeElse此MsgBo情x"請(qǐng)寫掛入完整的信善息!"胡EndI釀f臭EndS枝ub跌(2)退出尾添加零部件奇頁面代碼如五下:懸Priva燥teSu困bCom悠mand2短_Clic呼k()竭Form3君.Show綠Unloa須dMe王EndS擴(kuò)ub喇(吼7機(jī))享主界面荒五淡如圖充10古所示耽三術(shù)牲沙箭倒勵(lì)圖肺10張主界面犁主要代碼如懲下:疲(1)添加基個(gè)人信息代季碼如下:封Priva勇teSu喘bCom旁mand1巡_Clic愈k()耍Form5遵.Show玩EndS擊ub族(2)刪除丙個(gè)人信息代脫碼如下:盾Priva瓜teSu煎bCom芬mand2鍵_Clic距k()扯List1晨.Remo汪veIte務(wù)mLis鹽t1.Li蹄stInd便ex所List2遞.Remo瀉veIte凳mLis籮t2.Li竭stInd芬ex昂List3夢(mèng).Remo坡veIte驚mLis呀t3.Li塘stInd憲ex密List4走.Remo求veIte附mLis危t4.Li需stInd莖ex糾Call羅save蠅EndS齒ub農(nóng)(1)修改碑個(gè)人信息代倦碼如下:礦Priva犯teSu易bCom寫mand3揀_Clic讀k()塞IfLi扣st1.T恢ext=止""T撫hen瑞MsgBo導(dǎo)x"請(qǐng)選蘿擇修改對(duì)象業(yè)"Else趴Form6準(zhǔn).Show火Form6仰.Text嚇1=L盲ist1.捕Text樹Form6缸.Text烏2=L最ist3.凈Text椒Form6硬.Comb鄉(xiāng)o1.Te撿xt=堡List2賴.Text齒List1蘆.Remo飼veIte劃mLis恒t1.Li跟stInd興ex差List2乒.Remo鬧veIte烏mLis命t2.Li尾stInd吃ex停List3殼.Remo旺veIte歇mLis品t3.Li獄stInd柔ex鋸List4鈴.Remo努veIte紋mLis愿t4.Li造stInd匹ex貢EndI態(tài)f主EndS僵ub揀(4)退出侵個(gè)人信息窗良口代碼如下對(duì):嚷Priva乏teSu或bCom由mand4貸_Clic驢k()屑Form3楚.Show京Unloa轟dMe膛EndS廉ub輔(5)打開板個(gè)人信息窗腎口運(yùn)行代碼濱如下:返Priva伏teSu書bFor珠m_Loa袖d()i=0蔬Open視App.P央ath+喘"\ma皆g.dat倍"For嘆Rand痛omAs傾#1連DoWh井ileN槐otEO灶F(1)避i=i奸+1爭(zhēng)Get#之1,i,輩pers澤List1歌.AddI捆temp漫ers.b會(huì)h,i船-1貫List2你.AddI置temp蹦ers.x糕b,i部-1諒List3械.AddI鳳temp廁ers.x杠m,i費(fèi)-1財(cái)List4葛.AddI異temp恭ers.m悠m,i壤-1LoopClose記EndS底u(yù)b賢Priva先teSu容bLis縮t1_Cl牙ick()父List2撥.List翼Index枕=Li昏st1.L澇istIn碧dex傳List3約.List智Index鈔=Li膨st1.L娛istIn墻dex環(huán)List4很.List忙Index桑=Li狼st1.L痕istIn彎dex初EndS最ub壯Priva掏teSu周bLis前t2_Cl斃ick()虜List1類.List愉Index擔(dān)=Li票st2.L舍istIn鋒dex婚L(zhǎng)ist3燒.List斜Index腎=Li腿st2.L任istIn椒dex鑼List4匆.List捆Index腫=Li他st2.L粗istIn者dex放EndS佩ub發(fā)Priva氣teSu煩bLis冒t3_Cl希ick()閃List1零.List競(jìng)Index蚊=Li稀st3.L掌istIn昆dex館List2黑.List驗(yàn)Index劈=Li合st3.L應(yīng)istIn良dex顯List4嬌.List搬Index砍=Li抱st3.L蓋istIn捆dex盾EndS嬌ub織Priva啟teSu速bLis傲t4_Cl至ick()姑List1勵(lì).List鐘Index字=Li謠st4.L組istIn澡dex犬List2漲.List落Index申=Li驚st4.L葉istIn制dex喉List3帆.List窮Index新=Li定st4.L蜘istIn要dex嫩EndS害ub棕(懇8快)蛛主界面資六咳如圖賞11久所示素軍朝抱嫂紋談圖都11斗主界面巡主要代碼如陳下:軋Dimp采ersA捐sman悅ager盒Priva莫teSu令bFor墊m_Loa煌d()初Text3裳=""胳EndS吐ub膝Priva注teSu北bCom爹mand1柴_Clic寸k()底溫‘鉤確定添加按拆鈕爹IfTe刮xt1=三""O致rTex強(qiáng)t2=領(lǐng)""Or匙Text高3="眠"Or租Combo笛1.Tex蹈t="紀(jì)"The廳n野MsgBo導(dǎo)x"請(qǐng)輸校入完整的信做息"樓Text1趟.SetF患o(jì)cus參Exit隱Sub贏EndI長(zhǎng)f糖IfTe咱xt1<豬>""嘉AndT雹ext2昌<>""鐵And吩Text3過<>"預(yù)"And額Comb忙o1.Te乳xt<>看""
溫馨提示
- 1. 本站所有資源如無特殊說明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
- 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
- 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒有圖紙預(yù)覽就沒有圖紙。
- 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
- 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
- 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
- 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。
最新文檔
- 2025年度美容美發(fā)服務(wù)個(gè)人代理合同4篇
- 二零二五年度企業(yè)債權(quán)轉(zhuǎn)讓與債務(wù)轉(zhuǎn)移合同
- 2025年度大型建筑鋼材項(xiàng)目集中采購(gòu)合同
- 2024年銷售人員業(yè)績(jī)合同2篇
- 2025年度個(gè)人二手房買賣協(xié)議書范本:二手房交易法律咨詢合同
- 2025年度內(nèi)部員工股權(quán)激勵(lì)計(jì)劃變更與股權(quán)轉(zhuǎn)讓合同
- 二零二五年度奶粉行業(yè)市場(chǎng)分析報(bào)告定制合同
- 二零二五年度培訓(xùn)中心教師教學(xué)資源共享聘用合同
- 2025年度私人旅行規(guī)劃服務(wù)合同2篇
- 2025版抹灰班組安全生產(chǎn)責(zé)任制考核合同4篇
- 基因突變和基因重組(第1課時(shí))高一下學(xué)期生物人教版(2019)必修2
- 內(nèi)科學(xué)(醫(yī)學(xué)高級(jí)):風(fēng)濕性疾病試題及答案(強(qiáng)化練習(xí))
- 音樂劇好看智慧樹知到期末考試答案2024年
- 辦公設(shè)備(電腦、一體機(jī)、投影機(jī)等)采購(gòu) 投標(biāo)方案(技術(shù)方案)
- 查干淖爾一號(hào)井環(huán)評(píng)
- 案卷評(píng)查培訓(xùn)課件模板
- 2024年江蘇省樣卷五年級(jí)數(shù)學(xué)上冊(cè)期末試卷及答案
- 人教版初中英語七八九全部單詞(打印版)
- 波浪理論要點(diǎn)圖解完美版
- 金融交易數(shù)據(jù)分析與風(fēng)險(xiǎn)評(píng)估項(xiàng)目環(huán)境敏感性分析
- 牛頓環(huán)與劈尖實(shí)驗(yàn)論文
評(píng)論
0/150
提交評(píng)論