按揭購(gòu)房還貸計(jì)劃課程設(shè)計(jì)報(bào)告

1、<p>　　VB課程設(shè)計(jì)(論文)任務(wù)書</p><p>　　土木建筑 學(xué)　　院　　環(huán)境工程 ?！　I(yè) 2 　班</p><p>　　一、課程設(shè)計(jì)(論文)題目 ： 按揭購(gòu)房還款計(jì)劃 　　</p><p>　　二、課程設(shè)計(jì)(論文)工作自 2013 年 6 月17日起至

2、 2013 年 6 月 23 日止 </p><p>　　三、課程設(shè)計(jì)(論文) 地點(diǎn): 計(jì)算中心8#706 </p><p>　　四、課程設(shè)計(jì)(論文)內(nèi)容要求：</p><p>　　1. 本課程設(shè)計(jì)的目的</p><p>　　（1）進(jìn)一步鞏固和加深對(duì)“VB程序設(shè)計(jì)”課程基本知識(shí)的理解和掌握，了解VB語言在項(xiàng)目開發(fā)中

3、的應(yīng)用。</p><p>　　（2）學(xué)習(xí)程序設(shè)計(jì)開發(fā)的一般方法，了解和掌握項(xiàng)目開發(fā)過程及方式，培養(yǎng)正確的設(shè)計(jì)思想和分析問題、解決問題的能力，特別是項(xiàng)目設(shè)計(jì)能力。</p><p>　　（3）通過對(duì)標(biāo)準(zhǔn)化、規(guī)范化文檔的掌握并查閱有關(guān)技術(shù)資料等，培養(yǎng)項(xiàng)目設(shè)計(jì)開發(fā)能力。 </p><p>

4、;　　2. 課程設(shè)計(jì)的任務(wù)及要求</p><p><b>　　(1) 基本要求：</b></p><p>　　對(duì)系統(tǒng)功能進(jìn)行需求分析；</p><p>　　使用Visual basic開發(fā)環(huán)境進(jìn)行程序開發(fā)；</p><p>　?。?） 提出系統(tǒng)的設(shè)計(jì)方案；</p><p>　?。?） 編寫源程

5、序代碼并進(jìn)行調(diào)試。</p><p><b>　　(2) 創(chuàng)新要求</b></p><p>　　在基本要求達(dá)到后，可進(jìn)行創(chuàng)新設(shè)計(jì)。</p><p>　　(3) 課程設(shè)計(jì)報(bào)告撰寫及裝訂要求</p><p>　　課程設(shè)計(jì)報(bào)告的撰寫要求表述簡(jiǎn)明，圖表準(zhǔn)確。</p><p>　　報(bào)告按如下內(nèi)容和順序用A4紙

6、進(jìn)行打印并裝訂成冊(cè)。</p><p><b>　?。?）封面</b></p><p>　　采用統(tǒng)一的課程設(shè)計(jì)封面，并按要求填寫好封面要求的個(gè)人信息和選題。</p><p><b>　?。?）設(shè)計(jì)任務(wù)書</b></p><p><b>　?。?）評(píng)閱書</b></p>

7、<p><b>　?。?）目錄</b></p><p><b>　　（5）正文</b></p><p><b>　?。?）主要參考文獻(xiàn)</b></p><p>　　(4) 課程設(shè)計(jì)評(píng)分標(biāo)準(zhǔn)： </p><p>　?。?）達(dá)到課程設(shè)計(jì)的目的與要求，程序的可讀性較好，

8、并調(diào)試正確，60分；</p><p>　?。?）能正確回答設(shè)計(jì)的中老師所提問題，可增加10分；</p><p>　?。?）課程設(shè)計(jì)報(bào)告書寫規(guī)范整齊，可增加10分；</p><p>　?。?）心得體會(huì)認(rèn)真總結(jié)，可增加10分；</p><p>　?。?）程序有創(chuàng)新性，可增加10分；</p><p>　　成績(jī)?cè)u(píng)定實(shí)行優(yōu)秀、良

9、好、中等、及格和不及格五個(gè)等級(jí)。不及格者需重做。</p><p>　　(5) 課程設(shè)計(jì)進(jìn)度安排</p><p>　?。?）準(zhǔn)備階段（6學(xué)時(shí)）：選擇設(shè)計(jì)題目、了解設(shè)計(jì)目的要求、查閱相關(guān)資料。</p><p>　?。?）程序模塊設(shè)計(jì)分析階段（8學(xué)時(shí)）：程序總體設(shè)計(jì)、詳細(xì)設(shè)計(jì)。</p><p>　　(3) 代碼編寫調(diào)試階段（10學(xué)時(shí)）：程序模塊代碼

10、編寫、調(diào)試、測(cè)試。</p><p>　　(4) 撰寫論文階段（6學(xué)時(shí)）：總結(jié)課程設(shè)計(jì)任務(wù)和設(shè)計(jì)內(nèi)容，撰寫課程設(shè)計(jì)論文。</p><p>　　(6）課程設(shè)計(jì)題目具體要求：</p><p>　　設(shè)計(jì)要求：設(shè)計(jì)一個(gè)“按揭購(gòu)房還款計(jì)劃”</p><p>　　使用銀行按揭貸款是目前購(gòu)買商品房常用的方式，即一次性貸款然后每月償還，在預(yù)定年限（還款年數(shù)）內(nèi)

11、連本帶息還清為止。本題目要求編制一個(gè)實(shí)用程序，幫助準(zhǔn)備以按揭貸款形式購(gòu)買商品房的人士計(jì)算出以不同年限、不同數(shù)額、不同還款方式貸款時(shí)每月應(yīng)償還的款數(shù)、還款的總額以及還款額和貸款額的比值。</p><p>　　說明：貸款方式分為兩類：商業(yè)性貸款，年利率為5%；政策性貸款，年利率為4%（政策性貸款需要貸款人具有有效的公積金賬戶，且每人最多螚貸6萬元）。</p><p>　　等額本息還款法，每月還

12、款額相同，為：</p><p>　　等額本金還款法，每月還款額不相同，逐月遞減，第i月的還款額為，其中： ，月利率=年利率/12</p><p>　　⑴ 運(yùn)行程序，顯示主窗口（如圖1），其中“還款年數(shù)”組合框默認(rèn)值為“16”，“享受政策性貸款的人數(shù)”默認(rèn)為“二人”，“還款起始年月”默認(rèn)值為用戶使用時(shí)的日期。</p><p><b>　　圖1</b&

13、gt;</p><p>　?、?用戶根據(jù)需要輸入總額、選擇還款年數(shù)、政策性貸款人數(shù)和還款起始年月，然后單擊“等額本息還款法”按鈕彈出“等額本息還款法”窗口（圖2），顯示以“等額本息還款法”還款時(shí)“每月的還款額”、“全部本息總和”（每月還款額×還款月數(shù)）、“還款與貸款之比”（全部本息總和÷貸款額）。</p><p>　　圖2

14、 圖3</p><p>　　⑶ 在主窗口中單擊“等額本金還款法”按鈕，彈出“等額本金還款法”窗口（如圖3），列表框中顯示出從起始還款年月開始“每月還款額”以及“全部本金總和”及“還貸比”；單擊“保存到文件”按鈕，顯示如圖4所示的輸入對(duì)話框提示輸入文件名及路徑，然后將列表框中的內(nèi)容以文本文件的形式保存到指定文件中。</p><p>　　圖4

15、 圖5 </p><p>　?、?“等額本金還款法”和“等額本息還款法”窗口都必須單擊“關(guān)閉”按鈕后返回到主窗口?！暗阮~本金還款法”窗口中“每月還款額”列表框中顯示的內(nèi)容要求上下對(duì)齊。如果未輸入貸款總額就單擊計(jì)算按鈕，則顯示消息對(duì)話框予以提示。</p><p>　　

16、學(xué)生簽名： </p><p>　　2013年 6月 17 日</p><p>　　課程設(shè)計(jì)（論文）評(píng)閱意見</p><p>　　評(píng)閱人 周美玲 職稱 講師 </p><p>　　2013年 6 月 23 日 </p><p><b>　　目錄</b></p>

17、;<p>　　第1章 我的系統(tǒng)概要2</p><p><b>　　1.1功能介紹2</b></p><p>　　第2章內(nèi)容總體設(shè)計(jì)2</p><p><b>　　2.1設(shè)計(jì)思路2</b></p><p>　　2.2 屬性窗口3</p><p>　　第

18、3章源程序代碼6</p><p>　　3.1 Form1窗口的代碼6</p><p>　　3.2 Form2窗口的代碼8</p><p>　　3.3 Form3窗口的代碼8</p><p>　　3.4 模塊的代碼9</p><p>　　第4章 最后運(yùn)行結(jié)果及分析10</p><

19、;p>　　4.1 運(yùn)行結(jié)果10</p><p>　　4.2程序分析11</p><p>　　4.3運(yùn)行程序的相關(guān)說明13</p><p>　　第5章 心得體會(huì)15</p><p><b>　　參考文獻(xiàn)16</b></p><p>　　第1章 我的系統(tǒng)概要</p>&

20、lt;p><b>　　“</b></p><p>　　使用銀行按揭貸款是目前購(gòu)買商品房常用的方式，即一次性貸款后每月償還，在預(yù)定年限（還款年數(shù)）內(nèi)連本帶息還清為止。本題目要求 一個(gè)實(shí)用程序，幫助準(zhǔn)備以按揭貸款形式購(gòu)買商品房的人士計(jì)算出以不同年限、不同數(shù)額、不同還款方式貸款時(shí)每月應(yīng)還的款數(shù)、還款的總額以及還款額和貸款額的比例，幫助其進(jìn)行決策。</p><p>&l

21、t;b>　　1.1功能介紹</b></p><p>　　按揭購(gòu)房還款計(jì)劃的應(yīng)用程序是一個(gè)類似于計(jì)算器的問題，但它又不同于計(jì)算器，它能夠根據(jù)用戶的需要快地計(jì)算出其還款的總額以及還款額和貸款額的比例，當(dāng)系統(tǒng)界面和代碼設(shè)計(jì)完成運(yùn)行后，能夠?qū)崿F(xiàn)以下操作：</p><p>　?。?） 運(yùn)行程序，顯示主窗口，其中“還款年數(shù)”組合框默認(rèn)值為“15”，“享受政策性貸款的人數(shù)”默認(rèn)為“二人

22、”，“還款起始年月”默認(rèn)為用戶使用時(shí)的日期。</p><p>　?。?） 用戶根據(jù)需要輸入貸款總額、選擇還款年數(shù)、政策性貸款人數(shù)和還款起始年月，但后單擊“等額本息還款法”按鈕彈出“等額本息還款法”對(duì)話框，顯示以“等額還款本息還款法”還款時(shí)每月的還款額、全部本息總和（每月還款額×還款月數(shù)）、還款額與貸款額之比（全部本息總和除以貸款額）。</p><p>　　（3）在主窗體中單擊“等

23、額本金還款法”按鈕，彈出“等額本金還款法”對(duì)話框，列表框中顯示出從起始還款年月開始每月的還款額以及全部本息總和及還款比。單擊“保存到文件”按鈕，顯示如圖1.4所示輸入窗口提示文件名即路徑。然后將列表框中的內(nèi)容以文本文件的形式保存到指定文件中。</p><p>　　（4）“等額本金還款法”和“等額本息還款法”窗口都以模態(tài)窗口顯示，即必須單擊“關(guān)閉”按鈕后才能繼續(xù)使用之窗口?！暗阮~本金還款法”窗口中“每月還款額”列表

24、框中顯示的內(nèi)容要求上下對(duì)齊。如果未輸入貸款總額就單擊“計(jì)算”按鈕，則顯示消息框給予提示。</p><p>　　第2章內(nèi)容總體設(shè)計(jì)</p><p><b>　　2.1設(shè)計(jì)思路</b></p><p>　　分析:因?yàn)樯虡I(yè)性貸款和政策性貸款的年利率分別為5%和4%，所以用If Corpus1 > Corpus2 Then Corpus1

25、= Corpus1 - Corpus2 Else</p><p>　　Corpus2 = Corpus1 Corpus1 = 0 End If 來對(duì)貸款總額分類。</p><p>　　又因?yàn)檫€款方式分等額本息還款發(fā)和等額本金還款法兩種，其中等額本息還款法：由公式，每月還款額 等額本金還款法：有公式，第i個(gè)月還款額uation.3 </p

26、><p>　　所以建立一個(gè)全局通用的模塊，在模塊中定義A函數(shù) Function A(Corpus As Single, Rate As Single, Year As Integer) As Single 和 B函數(shù) Function B(Corpus As Single, Rate As Single, Year As Integer, Arr() As Single) As Single 然后再在每個(gè)

27、Click事件中調(diào)用這兩個(gè)即可。</p><p>　　要將得到的每個(gè)月還款額的列表框輸出到指定文件中，用Open 文件名 For 模式as 代號(hào)即可。具體流程圖如下：</p><p><b>　　流程圖</b></p><p><b>　　2.2 屬性窗口</b></p><p><b>

28、　　用戶界面：</b></p><p><b>　　對(duì)象屬性：</b></p><p><b>　　第3章源程序代碼</b></p><p>　　3.1 Form1窗口的代碼</p><p>　　Option Explicit</p><p>　　Privat

29、e Sub Form_Load()</p><p>　　Dim i As Integer</p><p>　　For i = 1 To 30</p><p>　　cboYear1.AddItem i</p><p><b>　　Next</b></p><p>　　cboYear1.Text =

30、15</p><p>　　For i = 0 To 9</p><p>　　cboYear.AddItem Year(Date) + i</p><p><b>　　Next</b></p><p>　　cboYear.Text = Year(Date)</p><p>　　For i = 1 T

31、o 12</p><p>　　cboMonth.AddItem i</p><p><b>　　Next</b></p><p>　　cboMonth.Text = month(Date)</p><p><b>　　End Sub</b></p><p>　　Private

32、 Sub Command1_Click()</p><p>　　Dim Corpus1 As Single</p><p>　　Dim Corpus2 As Single</p><p>　　Dim Rate As Single</p><p>　　Dim Year As Integer</p><p>　　Dim i

33、 As Integer</p><p>　　Dim A1 As Single</p><p>　　Dim A2 As Single</p><p>　　If Val(txtCorpus.Text) = 0 Or Val(cboYear1.Text) = 0 Then MsgBox "請(qǐng)輸入合適的貸款額。", 48, "注意":

34、 Exit Sub</p><p>　　Corpus1 = txtCorpus.Text</p><p>　　Year = cboYear1.Text</p><p>　　For i = 0 To 3</p><p>　　If Option1(i) Then Exit For</p><p><b>　　Ne

35、xt</b></p><p>　　Corpus2 = i * 6</p><p>　　If Corpus1 > Corpus2 Then</p><p>　　Corpus1 = Corpus1 - Corpus2</p><p><b>　　Else</b></p><p>　　

36、Corpus2 = Corpus1</p><p>　　Corpus1 = 0</p><p><b>　　End If</b></p><p>　　Corpus1 = Corpus1 * 10000</p><p>　　Corpus2 = Corpus2 * 10000</p><p>　　A1

37、 = A(Corpus1, 0.05, Year)</p><p>　　A2 = A(Corpus2, 0.04, Year)</p><p>　　Load Form2</p><p>　　Form2.Text1 = Format(A1 + A2, "0.00")</p><p>　　Form2.Text2 = Forma

38、t((A1 + A2) * Year * 12, "0.00")</p><p>　　Form2.Text3 = (A1 + A2) * Year * 12 / (Corpus1 + Corpus2)</p><p>　　Form2.Show 1</p><p><b>　　End Sub</b></p>&l

39、t;p>　　Private Sub Command2_Click()</p><p>　　Dim Corpus1 As Single</p><p>　　Dim Corpus2 As Single</p><p>　　Dim Rate As Single</p><p>　　Dim Year As Integer</p>

40、<p>　　Dim i As Integer, j As Integer</p><p>　　Dim A1 As Single</p><p>　　Dim A2 As Single</p><p>　　Dim start_year As Integer, start_month As Integer</p><p>　　Dim b1

41、() As Single</p><p>　　Dim b2() As Single</p><p>　　If Val(txtCorpus.Text) = 0 Or Val(cboYear1.Text) = 0 Then MsgBox "請(qǐng)輸入合適的貸款額。", 48, "注意": Exit Sub</p><p>　　Cor

42、pus1 = txtCorpus.Text</p><p>　　Year = cboYear1.Text</p><p>　　start_year = cboYear.Text</p><p>　　start_month = cboMonth.Text</p><p>　　ReDim b1(Year * 12)</p><

43、p>　　ReDim b2(Year * 12)</p><p>　　For i = 0 To 3</p><p>　　If Option1(i) Then Exit For</p><p><b>　　Next</b></p><p>　　Corpus2 = i * 6</p><p>　　

44、If Corpus1 > Corpus2 Then</p><p>　　Corpus1 = Corpus1 - Corpus2</p><p><b>　　Else</b></p><p>　　Corpus2 = Corpus1</p><p>　　Corpus1 = 0</p><p>&

45、lt;b>　　End If</b></p><p>　　Corpus1 = Corpus1 * 10000</p><p>　　Corpus2 = Corpus2 * 10000</p><p>　　A1 = B(Corpus1, 0.0504, Year, b1)</p><p>　　A2 = B(Corpus2, 0.0

46、405, Year, b2)</p><p>　　Load Form3</p><p>　　For i = 1 To Year * 12</p><p>　　Form3.List1.AddItem start_year & "年" & Format(start_month, "00") & "

47、月：" & Format(b1(i) + b2(i), "0.00") & "元"</p><p>　　start_month = start_month + 1</p><p>　　If start_month = 13 Then start_month = 1: start_year = start_year + 1&l

48、t;/p><p><b>　　Next</b></p><p>　　Form3.Text2 = A1 + A2</p><p>　　Form3.Text3 = (A1 + A2) / (Corpus1 + Corpus2)</p><p>　　Form3.Show 1</p><p><b>

49、;　　End Sub</b></p><p>　　Private Sub Command3_Click()</p><p><b>　　Unload Me</b></p><p><b>　　End Sub</b></p><p>　　3.2 Form2窗口的代碼</p>

50、<p>　　Private Sub Command1_Click()</p><p><b>　　Unload Me</b></p><p><b>　　End Sub</b></p><p>　　3.3 Form3窗口的代碼</p><p>　　Option Explicit<

51、/p><p>　　Private Sub Command1_Click()</p><p><b>　　Unload Me</b></p><p><b>　　End Sub</b></p><p>　　Private Sub Command2_Click()</p><p>　

52、　Dim s As String</p><p>　　Dim i As Integer</p><p>　　s = InputBox("請(qǐng)輸入文件名及路徑。", "文件名")</p><p>　　If s = "" Then Exit Sub</p><p>　　Open s For

53、 Output As 1</p><p>　　For i = 0 To List1.ListCount - 1</p><p>　　Print #1, List1.List(i)</p><p><b>　　Next</b></p><p><b>　　Close 1</b></p>

54、<p><b>　　End Sub</b></p><p>　　3.4 模塊的代碼</p><p>　　Option Explicit</p><p>　　Function A(Corpus As Single, Rate As Single, Year As Integer) As Single</p><p&

55、gt;　　Dim Temp As Single</p><p>　　Rate = Rate / 12#</p><p>　　Temp = (1 + Rate) ^ (Year * 12)</p><p>　　A = (Corpus * Rate * Temp) / (Temp - 1)</p><p>　　End Function</p

56、><p>　　Function B(Corpus As Single, Rate As Single, Year As Integer, Arr() As Single) As Single</p><p>　　Dim total As Single</p><p>　　Dim m_total As Single</p><p>　　Dim mo

57、nth As Integer</p><p>　　Dim i As Integer</p><p>　　Rate = Rate / 12</p><p>　　month = Year * 12</p><p>　　total = 0#</p><p>　　m_total = 0#</p><p>

58、;　　For i = 1 To month</p><p>　　m_total = Corpus / month + (Corpus - Corpus / month * (i - 1)) * Rate</p><p>　　Arr(i) = m_total</p><p>　　total = total + m_total</p><p>&

59、lt;b>　　Next</b></p><p><b>　　B = total</b></p><p>　　End function</p><p>　　第4章 最后運(yùn)行結(jié)果及分析</p><p><b>　　4.1 運(yùn)行結(jié)果</b></p><p>　　

60、當(dāng)貸款總額為10時(shí)，運(yùn)行結(jié)果如圖：</p><p><b>　　單擊等額本息還款法</b></p><p><b>　　等額本金還款法</b></p><p>　　當(dāng)輸入貸款總額為0時(shí)：</p><p><b>　　4.2程序分析</b></p><p>

61、;<b>　　運(yùn)行錯(cuò)誤</b></p><p>　　在設(shè)計(jì)代碼的時(shí)候，確實(shí)遇到了不少問題，首先，在設(shè)置控件的屬性只能的時(shí)候，不知道哪些該改，哪些不該改。然后，編寫代碼時(shí)出現(xiàn)了很多錯(cuò)誤。</p><p>　　1 模塊中的通用函數(shù)A、B，一是由公式代換時(shí)出現(xiàn)錯(cuò)誤，二是定義變量時(shí)漏掉許多東西，于是就調(diào)試，重新定義變量。</p><p>　　2在應(yīng)用

62、For循環(huán)語句和If條件語句嵌套時(shí)，漏寫Next或者Then或者End If。措施：加上缺少的語句即可。</p><p>　　3不知道怎么計(jì)算政策性和商業(yè)性貸款的總額，上網(wǎng)查詢。</p><p>　　4在調(diào)用通用過程時(shí)定義的變量有誤，重新定義變量。。</p><p>　　5使消息對(duì)話框出現(xiàn)警告，不知道用48代號(hào)，查閱書本。</p><p>　

63、　6文件輸出時(shí)出現(xiàn)路徑錯(cuò)誤，調(diào)試后才發(fā)現(xiàn)是文件名錯(cuò)誤。</p><p>　　4.3運(yùn)行程序的相關(guān)說明</p><p>　　用戶根據(jù)需要輸入貸款總額、選擇還款年數(shù)、政策性貸款人數(shù)和還款起始年月，然后單擊“等額本息還款法”按鈕彈出“等額本息還款法”對(duì)話框，顯示以“等額還款本息還款法”還款時(shí)每月的還款額、全部本息總和（每月還款額×還款月數(shù)）、還款額與貸款額之比（全部本息總和除以貸款額）

64、。在主窗體中單擊“等額本金還款法”按鈕，彈出“等額本金還款法”對(duì)話框，列表框中顯示出從起始還款年月開始每月的還款額以及全部本息總和及還款比。單擊“保存到文件”按鈕，顯示如圖1.4所示輸入窗口提示文件名即路徑。然后將列表框中的內(nèi)容以文本文件的形式保存到指定文件中。如果未輸入貸款總額就單擊“計(jì)算”按鈕，則顯示如圖的消息框給予提示。</p><p><b>　　第5章 心得體會(huì)</b></

65、p><p>　　說實(shí)話，vb課程設(shè)計(jì)對(duì)我來說確實(shí)有很大的挑戰(zhàn)性，有很多東西都要自學(xué)，還要咨詢有經(jīng)驗(yàn)的學(xué)長(zhǎng)，但通過這個(gè)課程設(shè)計(jì)讓我對(duì)vb有了進(jìn)一步的了解。</p><p>　　在這次的程序設(shè)計(jì)過程中，我遇到了很多問題。什么定義不存在之類的問題，于是我選擇了調(diào)試，可它指向的卻是“If Option1(i) Then Exit for”這一行，我百思不得其解。翻書查看無效之后，我便開始問學(xué)長(zhǎng)究竟什么

66、原因，終于讓我發(fā)現(xiàn)了這個(gè)“Option1”，原來是我錯(cuò)把1(數(shù)字)寫成l（英文字母）。在VB設(shè)計(jì)的過程中類似于這樣的問題有很多，看似很小的問題，即使是一個(gè)小標(biāo)點(diǎn)或是一個(gè)英文字母對(duì)程序的影響也很大。因此，在設(shè)計(jì)的過程中，我們需要足夠的耐心。 </p><p>　　在這次的課程設(shè)計(jì)的過程中雖然碰到很多問題，但我收獲頗多。的確，是它讓我明白了萬事開頭難，但剛剛開始遇到一些困難沒關(guān)系，慢慢來。編程序本來就是一個(gè)比較繁瑣的

67、過程，是一個(gè)需要不斷學(xué)習(xí)、不斷積累的過程，而編寫程序的樂趣大概也正在于這樣學(xué)習(xí)的過程中吧。</p><p>　　這次程序的編寫也讓我明白編程不是一項(xiàng)輕松的活，尤其是對(duì)于一個(gè)VB課程設(shè)計(jì)，它并不像我們平常的上機(jī)作業(yè)那樣。面對(duì)每次的運(yùn)行結(jié)果是“類型不匹配”或是“函數(shù)未定義”時(shí)，我整個(gè)人幾乎面臨崩潰，畢竟時(shí)間有限。這樣的VB課程設(shè)計(jì)真的很能鍛煉一個(gè)人的自學(xué)水平，沒有一定的基本功、細(xì)心及耐心是絕對(duì)不可能做到的。</

68、p><p>　　現(xiàn)在回想起整個(gè)課程設(shè)計(jì)的過程，有時(shí)候真的不想做了，討厭代碼編寫過程經(jīng)常漏洞百出和有些程序不能正常運(yùn)行，在某一個(gè)瞬間程序正常運(yùn)行之后我會(huì)不自覺的開懷大笑。總之，VB給予了我歡樂與痛苦。通過這樣一個(gè)學(xué)期VB的學(xué)習(xí)以及以這次課程設(shè)計(jì)，我對(duì)VB這門高級(jí)的程序設(shè)計(jì)語言有了許多了解。逐漸喜歡上了編程的過程。接下來，我一定要好好復(fù)習(xí)所學(xué)內(nèi)容去迎接最后的VB期末考核。相信我一定行。</p><p&