VB-計(jì)算器-課程設(shè)計(jì)

華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告VB課程設(shè)計(jì)（論文）任務(wù)書電子版：1503284681扣扣機(jī)電學(xué)12物流專業(yè)_2班班一、課程設(shè)計(jì)（論文）題目：計(jì)算器 二、課程設(shè)計(jì)（論文）工作自2013年06月17日起至2013年06月23日止三、課程設(shè)計(jì)（論文）地點(diǎn)： 計(jì)算中心8#601四、課程設(shè)計(jì)（論文）內(nèi)容要求：.本課程設(shè)計(jì)的目的（1）進(jìn)一步鞏固和加深對(duì)“VB程序設(shè)計(jì)”課程基本知識(shí)的理解和掌握，了解VB語(yǔ)言在項(xiàng)目開發(fā)中的應(yīng)用。 —~（2）學(xué)習(xí)程序設(shè)計(jì)開發(fā)的一般方法，了解和掌握項(xiàng)目開發(fā)過程及方式，培養(yǎng)正確的設(shè)計(jì)思想和分析問題、解決問題的能力，特別是項(xiàng)目設(shè)計(jì)能力。（3）通過對(duì)標(biāo)準(zhǔn)化、規(guī)范化文檔的掌握并查閱有關(guān)技術(shù)資料等，培養(yǎng)項(xiàng)目設(shè)計(jì)開發(fā)能力。.課程設(shè)計(jì)的任務(wù)及要求（1）基本要求: ""1）對(duì)系統(tǒng)功能進(jìn)行需求分析； 一2）使用Visualbasic開發(fā)環(huán)境進(jìn)行程序開發(fā)；3）提出系統(tǒng)的設(shè)計(jì)方案； 一4）編寫源程序代碼并進(jìn)行調(diào)試。 （2）創(chuàng)新要求在基本要求達(dá)到后，可進(jìn)行創(chuàng)新設(shè)計(jì)。（3）課程設(shè)計(jì)報(bào)告撰寫及裝訂要求課程設(shè)計(jì)報(bào)告的撰寫要求表述簡(jiǎn)明，圖表準(zhǔn)確。 報(bào)告按如下內(nèi)容和順序用A4紙進(jìn)行打印并裝訂成冊(cè)?！獈1）封面采用統(tǒng)一的課程設(shè)計(jì)封面，并按要求填寫好封面要求的個(gè)人信息和選題。 2）設(shè)計(jì)任務(wù)書 一3）評(píng)閱書 4）目錄 5）正文 6）主要參考文獻(xiàn) （4）課程設(shè)計(jì)評(píng)分標(biāo)準(zhǔn)：""1）達(dá)到課程設(shè)計(jì)的目的與要求，程序的可讀性較好，并調(diào)試正確，60分；2）能正確回答設(shè)計(jì)的中老師所提問題，可增加10分；3）課程設(shè)計(jì)報(bào)告書寫規(guī)范整齊，可增加10分; 4）心得體會(huì)認(rèn)真總結(jié)，可增加10分； 一5）程序有創(chuàng)新性，可增加10分；成績(jī)?cè)u(píng)定實(shí)行優(yōu)秀、良好、中等、及格和不及格五個(gè)等級(jí)。不及格者需重做。（5）課程設(shè)計(jì)進(jìn)度安排：華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告1）準(zhǔn)備階段（6學(xué)時(shí)）：選擇設(shè)計(jì)題目、了解設(shè)計(jì)目的要求、查閱相關(guān)資料。2）程序模塊設(shè)計(jì)分析階段（8學(xué)時(shí)）：程序總體設(shè)計(jì)、詳細(xì)設(shè)計(jì)。3）代碼編寫調(diào)試階段（10學(xué)時(shí)）：程序模塊代碼編寫、調(diào)試、測(cè)試。 4）撰寫論文階段（6學(xué)時(shí)）：總結(jié)課程設(shè)計(jì)任務(wù)和設(shè)計(jì)內(nèi)容，撰寫課程設(shè)計(jì)論文。（6）課程設(shè)計(jì)題目具體要求：設(shè)計(jì)要求：設(shè)計(jì)一個(gè)“計(jì)算器” 本題目要求編制一個(gè)“計(jì)算器”程序，不但具有家、減、乘、除等簡(jiǎn)單功能，還要求包括常用數(shù)學(xué)函數(shù)的功能，并且可以進(jìn)行存儲(chǔ)、清零等操作。 ⑴“計(jì)算器”（如圖1）要求包含的功能有：加、減、乘、除、存儲(chǔ)、顯示存儲(chǔ)結(jié)果、存儲(chǔ)器清零，以及計(jì)算正弦、余弦、正切、余切、反正弦、反余弦、反正切、反余切、求自然對(duì)數(shù)、求以10為底的對(duì)數(shù)、求階乘等功能。圖1 ~~⑵要求計(jì)算器上數(shù)字0?9為一個(gè)控件數(shù)組，加、減、乘、除為一個(gè)控件數(shù)組，存儲(chǔ)X一M）、存儲(chǔ)顯示（RM）、存儲(chǔ)相加（M+）為一個(gè)控件數(shù)組，計(jì)算功能框中所有的功能按鈕（如sin、cos、Ln及n!等）為一個(gè)控件數(shù)組⑶輸入的原始數(shù)據(jù)、運(yùn)算的中間結(jié)果及最終結(jié)果都顯示在窗口頂部的同一個(gè)文本框中。~~⑷能用系統(tǒng)內(nèi)部函數(shù)的計(jì)算功能盡量采用系統(tǒng)函數(shù)，沒有相應(yīng)系統(tǒng)函數(shù)的計(jì)算功能要定義獨(dú)立的函數(shù)過程。⑸對(duì)于三角函數(shù)，其輸入的角度單位為度；對(duì)于反三角函數(shù)，輸出的結(jié)果單位也為度，要求當(dāng)輸入的單位或數(shù)值不符合題意時(shí)，程序能及時(shí)地在窗口底部的信息窗口中提示或用消息框提示（如反正弦函數(shù)原始數(shù)據(jù)的范圍為[-1,1],若用戶輸入的數(shù)據(jù)不在此范圍，則程序能顯示“數(shù)據(jù)超出反正閑的數(shù)值范圍，請(qǐng)重新輸入!”（如圖2）,自動(dòng)將文本框中的數(shù)據(jù)清除，并使文本框獲得焦點(diǎn)，等待用戶重新輸入）。calc數(shù)據(jù)荏出應(yīng)親弦的數(shù)值范圍，話重新輸入.二二通定二二|⑹“X-M”按鈕可將當(dāng)前顯示的數(shù)值保存到寄存器中，如果存儲(chǔ)器中已有數(shù)據(jù)，則被華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告覆蓋?！癛M”按鈕可以調(diào)出寄存器中的數(shù)據(jù)，并可參與到當(dāng)前進(jìn)行的計(jì)算中?！癕+”按鈕可以將當(dāng)前顯示的數(shù)據(jù)和寄存器當(dāng)前保存的數(shù)據(jù)相加后保存到寄存器中。每按一次“->”按鈕可以刪除當(dāng)前數(shù)據(jù)的最后一位?！癈”按鈕可以清除所有已輸入的數(shù)據(jù)從頭計(jì)算；“CE”按鈕只清除當(dāng)前輸入的數(shù)據(jù)，重新輸入數(shù)據(jù)可以繼續(xù)當(dāng)前計(jì)算。學(xué)生簽名： 2013年06月日華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告課程設(shè)計(jì)（論文）評(píng)閱意見序號(hào)項(xiàng)目等 級(jí)優(yōu)秀良好中等及格不及格1課程設(shè)計(jì)態(tài)度評(píng)價(jià)2出勤情況評(píng)價(jià)3任務(wù)難度評(píng)價(jià)4工作量飽滿評(píng)價(jià)5設(shè)計(jì)中創(chuàng)新性評(píng)價(jià)6論文書寫規(guī)范化評(píng)價(jià)綜合評(píng)定等級(jí)評(píng)閱人職稱2013年月日華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告目錄TOC\o"1-5"\h\z\o"CurrentDocument"一：任務(wù)概述 1\o"CurrentDocument"二：系統(tǒng)總體設(shè)計(jì)方案 2\o"CurrentDocument"三：系統(tǒng)的調(diào)試 4\o"CurrentDocument"四：源程序代碼及必要注釋 6\o"CurrentDocument"五：運(yùn)行結(jié)果及分析 15六：心得體會(huì) 17參考文獻(xiàn)華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告一、任務(wù)概述.設(shè)計(jì)任務(wù)：編制一個(gè)計(jì)算機(jī)程序，使其不僅能夠擁有簡(jiǎn)單的加減乘除運(yùn)算，還具有常用數(shù)學(xué)函數(shù)功能，使其具備科學(xué)計(jì)算器的大部分功能。.程序啟動(dòng)啟動(dòng)程序會(huì)看見黃色背景色，有36個(gè)命令按鈕和一個(gè)文本框構(gòu)成，文本框呈淺藍(lán)色按下OFF按鈕可關(guān)閉程序。該計(jì)算器具有記憶儲(chǔ)存功能（XfM）以及儲(chǔ)存相加（M+）功能。當(dāng)存儲(chǔ)器中數(shù)不為零時(shí)會(huì)在Text框中顯示M，否則M消失。對(duì)于輸入的數(shù)據(jù)不符合相對(duì)應(yīng)的運(yùn)算法則時(shí)，電腦會(huì)自動(dòng)報(bào)錯(cuò)（數(shù)據(jù)超出**的數(shù)值范圍，請(qǐng)重新輸入?。?，此時(shí)應(yīng)從新輸入數(shù)據(jù)。符號(hào)+/-是正負(fù)的切換，按一下就為負(fù)，再按一次又轉(zhuǎn)為正。對(duì)于更多的內(nèi)容后面章節(jié)會(huì)提及。.任務(wù)目的檢驗(yàn)自己學(xué)期內(nèi)的學(xué)習(xí)效果和自習(xí)能力，更好地掌握VB編程技術(shù)。

華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告二、系統(tǒng)總體設(shè)計(jì)方案.構(gòu)思流程圖:圖2—1.各屬性值的變換：文本框和窗體顏色在“BackColor”中改變，分別如圖2-2和2-3，其中，文本框

中的Locked改為true使其不能人工輸入，此時(shí)Text為只讀！文本框顏色改為淺藍(lán)色，窗體的顏色改為黃色華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告Igffi-Teitl|Fez11leilEtu在字壬序於三類序AliEiineiLi0-LeftJustifyAppearMicei-3rl!-xcldColof□^I：II：I????I：IIMBprlerStyle1-FistedSirigl^CaTLEezYalidalianTrueIl：dih電IdIlaiiFormatDaidlenberDa.i CADr也祖e(Noras.JIragJIode0-ManualEnabledTrueTout策佯IoreColor■i4800000084Heidit975H41pC>:>ni4xiIIIOHid^ScleciiqilTrueINEn.：..ieO-NoOperationIinieELef-.非［LinHteniL3TiJifJod.fiD-Eon。LiidzTanet-uiSOLiiiklopicLoekedTrueFbucLengtt0IIouselcon(Hone)NdTiseJ'iijjfler0-DefaultFlulMUn電FolaOLEDr3.O_Marital.OLEHriipriiiiieO-NonefaEEVordChirKigMToL電ftFalseScriillBai'E0-None7^Llnddx1急性-■十宜器E計(jì)篁器Forn按字母序按分類序溶標(biāo)〕 |計(jì)算器Appearance1-3HAutoReiirawF：i1ehEackColor□i^iKnnnnjFFF^BorderStyle2-SizableCajition計(jì)算器ClipControleTrueCijiLtrolBoxTrueHrawMcide13_匚口pyFenLrawStyle0-SolidDrawWidth1EnabledTrueFine01or■■^00000000.3.FillStyle1-TranEpar白ntFout宋體FojitTr皿sparentTrueForeColorr.ftH8LlLlLll：lLll2&HazDCTrueHeiglit11520KelpContextID0IcDR(Icon.)KeyPreviewFils^Left0LirikfilodeU一NoneLiiilzTopicF(rm1MaiButtonTrueMlUChildF：±1ehMinBut+onTrusMhueeli：on(Ifone)MuueeFuinterU-DefaultMovt：以匕1eTrueNegotiateFilenuETrueOLEDropMode0一NonePol?!11GQf口n,白］PaletteModeU一H：dlttijrLHPictureOfone'IV—■----—-圖2-3圖圖2-3華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告三、系統(tǒng)的調(diào)試1、關(guān)于函數(shù)運(yùn)算和進(jìn)制轉(zhuǎn)換的屬性及屬性值對(duì)象名稱屬性屬性值命令按鈕Commond2(0)CaptionSin命令按鈕Commond2(1)CaptionCos命令按鈕Commond2(2)CaptionTan命令按鈕Commond2(3)CaptionCot命令按鈕Commond2(4)CaptionArcsin命令按鈕Commond2(5)CaptionArctan命令按鈕Commond2(6)CaptionArccos命令按鈕Commond2(7)Captionn!命令按鈕Commond2(8)CaptionSec命令按鈕Commond2(9)CaptionArccot命令按鈕Commond2(10)CaptionLog命令按鈕Commond2(11)CaptionLn命令按鈕Commond5(0)CaptionXfM命令按鈕Commond5(1)Captionf命令按鈕Commond5(2)CaptionCE命令按鈕Commond5(3)CaptionC命令按鈕Commond5(4)CaptionM+命令按鈕Commond5(5)CaptionRM

華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告2、運(yùn)算有關(guān)的屬性及其屬性值對(duì)象名稱屬性屬性值窗體FormlCaption計(jì)算器文本框Textltext空Lockedtrue命令按鈕Commond3(0~9)Caption0~9命令按鈕Commond4(0~3)Caption+,-,：,X,命令按鈕Commond4(8)Caption+/-命令按鈕Commond4(7)Caption.命令按鈕Commond4(4)Caption=華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告h程序源代碼及必要注釋PublicangAsDoublePublicCalKeyAsStringDimbAsIntegerDimaAsIntegerDimcAsDoubleDimregAsDoubleDimcnumberAsDoubleDimredoAsBooleanDimdflagAsIntegerDimiAsIntegerDimopnreAsIntegerDimprevAsDoubleDimoflagAsIntegerDimindAsIntegerPrivateSubCommand2_Click(IndexAsInteger)SelectCaseIndexCase0Text1.Text=Str(Sin(ang*Val(Text1.Text)))IfVal(Text1.Text)<>0ThenText1.Text=Str(Cos(ang*Val(Text1.Text)))ElseMsgBox"數(shù)據(jù)超出余弦的數(shù)值范圍，請(qǐng)重新輸入！"，16,"calc"EndIfIf(Cos(Val(Text1.Text)))<>0Then 'tan中的sin不能為0Text1.Text=Str(Sin(ang*Val(Text1.Text))/Cos(ang*Val(Text1.Text)))ElseMsgBox”數(shù)據(jù)超出正切的數(shù)值范圍，請(qǐng)重新輸入！"，16,"calc"EndIfIf(Sin(Val(Text1.Text)))<>0ThenText1.Text=Str(Cos(ang*Val(Text1.Text))/Sin(ang*Val(Text1.Text)))ElseMsgBox"數(shù)據(jù)超出余切的數(shù)值范圍，請(qǐng)重新輸入！"，16,"calc"EndIf華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告a=Val(Textl.Text)IfVal(Textl,Text)>-1AndVal(Textl,Text)<1Thena=Atn(a/Sqr(1-a*a))Textl.Text=a 反正弦、余弦范圍均不能超過{-1,1}ElseMsgBox”數(shù)據(jù)超出反正弦的數(shù)值范圍，請(qǐng)重新輸入！"，16,"calc"EndIfText1.Text=Str((Atn(Val(Text1.Text)))/ang)IfVal(Text1.Text)>-1AndVal(Text1.Text)<1Thena=Atn(Sqr(1-a*a)/a)Text1.Text=aElseMsgBox"數(shù)據(jù)超出反余弦的數(shù)值范圍，請(qǐng)重新輸入！",16,"calc"EndIfText1.Text=Str(fact(Val(Text1.Text)))IfVal(Text1.Text)>-1AndVl(Text1.Text)<1ThenText1.Text=1/Str(Sin(ang*Val(Text1.Text)))ElseMsgBox”數(shù)據(jù)超出正割的數(shù)值范圍，請(qǐng)重新輸入！",16,"calc"EndIfText1.Text=Str((ang/Atn(Val(Text1.Text))))IfVal(Text1.Text)>0ThenText1.Text=Str((Log(Val(Text1.Text))/Log(10)))ElseMsgBox"數(shù)據(jù)超出Log的數(shù)值范圍，請(qǐng)重新輸入！"，16,"calc"EndIfIfVal(Text1.Text)>0ThenText1.Text=Str(Log(Val(Text1.Text)))ElseMsgBox"數(shù)據(jù)超出Ln的數(shù)值范圍，請(qǐng)重新輸入！",16,"calc"EndIfEndSelect華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告EndSubPrivateSubCommand5_Click(IndexAsInteger)SelectCaseIndexCase0c=0Case0Text1.Text=Str(c)Case2c=Val(Textl.Text)Textl.Text="M"pr=tStrNuml=Textl.TextIfLen(StrNuml)>0ThenStrNuml=Left(StrNuml,Len(StrNuml)-l)Textl.Text=StrNumlElseTextl.Text="0.0"EndIfredo=Trueresult=0Textl.Text="0"cnumber=0reg=0cdecimal=FalseTextl.Text=""Textl.SetFocusc=Val(Textl.Text)Textl.Text="M"pr=t華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告c=0Case0Textl.Text=Str(mem)Case2c=Val(Textl.Text)Textl.Text="M"pr=tEndSelectEndSubPrivateSubForm_Load()dflag=0prev=0oflag=0ind=0opnre=0Clipboard.Clearang=3.14/180EndSubFunctionpower(mAsDouble,nAsLong)AsDoubleDimiAsDoublei=1If(n>0)ThenWhilen>0n=n-1i=i*mWendpower=iElseIf(n=0)Thenpower=1ElseMsgBox("ILLEGAL.POWERLESTHAN0,")EndIfEndFunctionFunctionfact(numAsLong)AsLongIf(num<0Ornum=0)ThenMsgBox("ILLEGALNEAGETIVEFACTORIAL")fact=numElse華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告If(num>12)ThenMsgBox("VALUETOOLARGE")fact=numElsere=1While(num>0)re=re*numnum=num-1Wendfact=reEndIfEndIfEndFunctionPrivateSubForm_KeyPress(KeyAsciiAsInteger)IfKeyAscii=Asc(".")Theni=10Command3_Click(i)BeepElseIfKeyAscii=Asc("0")Theni=0Command3_Click(i)BeepElseIfKeyAscii=Asc("1")Theni=1Command3_Click(i)BeepElseIfKeyAsci3=Asc("2")Theni=2Command3_Click(i)BeepElseIfKeyAscii=Asc("3")Theni=3Command3_Click(i)BeepElseIfKeyAscii=Asc("4")Theni=4Command3_Click(i)BeepElseIfKeyAscii=Asc("5")Theni=5華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告Command3_Click(i)BeepElselfKeyAscii=Asc("6")Theni=6Command3_Click(i)BeepElseIfKeyAscii=Asc("7")Theni=7Command3_Click(i)BeepElseIfKeyAscii=Asc("8")Theni=8Command3_Click(i)BeepElseIfKeyAscii=Asc("9")Theni=9Command3_Click(i)BeepElseIfKeyAscii=Asc("0")Theni=0Command3_Click(i)BeepElseIfKeyAscii=Asc("+")Theni=0Command4_Click(i)BeepElseIfKeyAscii=Asc("+")Theni=0Command4_Click(i)BeepElseIfKeyAscii=Asc("-")Theni=1Command4_Click(i)BeepElseIfKeyAscii=Ascf=")Theni=2Command4_Click(i)BeepElseIfKeyAscii=Asc("x")Theni=3Command4_Click(i)BeepElseIfKeyAscii=Asc("=")Then華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告=4Command4_Click(i)BeepElselfKeyAscii=Asc("c")OrKeyAscii=Asc("C")Thendflag=0prev=0oflag=0ind=0opnre=0Text1.Text="0"BeepBeepElseIfKeyAscii=Asc("d")OrKeyAscii=Asc("D")ThenText1.Text="0"BeepEndIfEndSubPrivateSubCommand1_Click()UnloadMeEndSubPrivateSubCommand4_Click(IndexAsInteger)DimnAsLongDimrAsLongIfopnre=0OrIndex=4ThenIfind=0Thenprev=prev+Val(Text1.Text)ElseIfind=1Thenprev=prev-Val(Text1.Text)ElseIfind=6Thenprev=prevModVal(Text1.Text)ElseIfind=7Thenr=Fix(Val(Text1.Text))n=Fix(Val(prev))If((n>rOrn=r)Andn>0And(r>0Orr=0))Thenprev=fact(n)/(fact(n-r))ElseMsgBox("ILLEGALENTRIESofN,R")EndIfElseIfind=5Thenr=Fix(Val(Text1.Text))n=Fix(Val(prev))If((n>rOrn=r)Andn>0And(r>0Orr=0))Then華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告prev=fact(n)/(fact(n-r)*fact(r))ElseMsgBox("ILLEGALENTRIESofN,R")EndIfElseIfind=8ThenIf(Text1.Text=""Orprev=0)ThenMsgBox("ILLEGAL.INVALIEDENTRIES")Elseprev=(power(prev,Fix(Val(Text1.Text))))EndIfElseIfind=2ThenIfVal(Textl,Text)<>0Thenprev=prev/Val(Textl.Text)ElseMsgBox("ILLEGALDIVIDE0")EndIfElseIfind=3Thenprev=prev*Val(Textl.Text)EndIfTextl.Text=Str(prev)oflag=0opnre=1ind=Indexdflag=0EndIfIfIndex=8ThenIfTextl=Textl.TextThenTextl.Text=Val(Textl.Text)*-lElseIfTextl.Text="-"&Textl.TextThenTextl.Text=Val(Textl.Text)*-lEndIfEndIfEndSubPrivateSubCommand3_Click(IndexAsInteger)Ifind=4Thenprev=0Textl.Text=""ind=0EndIfopnre=0Ifoflag=0ThenTextl.Text=""華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告EndIfoflag=1IfCommand3(Index).Caption<>"."ThenIfText1.Text<>"0"ThenText1.Text=Text1.Text&Command3(Index).CaptionElseText1.Text=""&Command3(Index).CaptionEndIfElseIfdflag=0ThenText1.Text=Text1.Text&"."dflag=1ElseMsgBox("ILLEGALSAIRAM")EndIfEndIfEndSub設(shè)計(jì)界面示意圖:華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告五、運(yùn)行結(jié)果及分析1、運(yùn)行窗口結(jié)果:下圖為運(yùn)行88^66的結(jié)果下圖為打開除運(yùn)行狀態(tài)的界面:華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告下面兩幅圖為運(yùn)行Log99的結(jié)果，其中Log為以10為底的對(duì)數(shù)2、程序分析及使用說明.當(dāng)點(diǎn)擊OFF控件時(shí)，系統(tǒng)自動(dòng)關(guān)閉.當(dāng)運(yùn)行Arcsin、Arccos時(shí)輸入的范圍超過【-1,1】，則系統(tǒng)自動(dòng)報(bào)錯(cuò)，會(huì)如下圖所顯示：(3).當(dāng)按下“一”鍵后，原先文本框里的數(shù)字會(huì)從最后一個(gè)數(shù)字起慢慢刪減。(4),輸入的數(shù)據(jù)不正確系統(tǒng)會(huì)自動(dòng)報(bào)錯(cuò)華東交通大學(xué)VB課程設(shè)計(jì)報(bào)告六、心得體會(huì).對(duì)學(xué)習(xí)VB程序語(yǔ)言設(shè)計(jì)首先要有強(qiáng)大的興趣和苦干的毅力。.平時(shí)經(jīng)常學(xué)習(xí)VB是很有必要的。.VB這門課程很難因此要更加重視，因此在學(xué)習(xí)生活中要做到如下幾點(diǎn)：（1）課前預(yù)習(xí)，認(rèn)真聽課并適當(dāng)做些筆記，課后要認(rèn)真復(fù)習(xí)消化所學(xué)內(nèi)容，完成作業(yè).（2）學(xué)習(xí)程序設(shè)計(jì)要注重理解一些重要的概念.VB程序設(shè)計(jì)本身并不復(fù)雜，翻開一本程序設(shè)計(jì)學(xué)習(xí)的書籍，看到的無(wú)非就是變量,函數(shù)，條件語(yǔ)句彳循環(huán)語(yǔ)句等概念.但要真正能進(jìn)行程序設(shè)計(jì)，需要深入理解這些概念.因此，在程序入門階段還是應(yīng)該重視概念的學(xué)習(xí)（3）程序設(shè)計(jì)入門階段要經(jīng)常自己動(dòng)手抄寫或編寫一些小程序，親自動(dòng)手進(jìn)行程序設(shè)計(jì)是創(chuàng)造性思維應(yīng)用的體現(xiàn),是培養(yǎng)邏輯思維的好方法.因此一定要多動(dòng)手編寫程序，而且要從小程序開發(fā)開始，逐漸提高寫程序的能力.（4）多看別人設(shè)計(jì)好的程序代碼，包括教材上的例題程序.在讀懂別人程序后，要想他為什么這么設(shè)計(jì)能不能將程序修改完成更多的功能則可以學(xué)到別人優(yōu)秀的東西，幫助自己提高自身水平..學(xué)習(xí)VB這門課程的意義VB編程可不是一項(xiàng)輕