俄羅斯方塊俄羅斯方塊vb報告I/30I/30visualbasic繼承了basic語言易學易用的特點，特別適合于初學者學習windows系統編程。隨著21世紀信息社會的到來，計算機在人們的工作和生活中的深入，要求我們越來越多地與計算機打交道，為了使用戶在繁忙的日程工作中得到放松，于是出現了各種各樣的休閑軟件，如聊天工具，游戲等等。于是我們小組著手設計開始一個這樣的游戲軟件。通過這學期來VisualBasic的學習，我初步掌握了VisualBasic語言的最基本的知識，于是在王洪江，任娜等老師的指導下動手用VisualBasic編寫俄羅斯方塊游戲。無可爭議，《俄羅斯方塊》是有史以來最偉大的游戲之一。它是永恒的娛樂經典，但它實際上又和那些傳統的經典娛樂方式不同，因為它的本質是電子化的，所以它的確屬于現代產物。《俄羅斯方塊》舉世聞名的游戲性，在該游戲新鮮出爐時就顯得非常直觀。某些與墜落的玩具碎片和它們的形狀有關的東西，使得哪怕新手也會很自然地企圖把它們排列起來，并加以適當組合，就好似《俄羅斯方塊》觸動了我們某些內在的感官，使得哪怕是我們當中最雜亂無章的人也要把事情整理妥當。在曾經發布過的所有游戲中，《俄羅斯方塊》還被認為是僅有的一個能夠真正吸引廣泛人群的作品。某些批評家也許會聲稱，《俄羅斯方塊》要比過去二十年間出現的任何東西都要浪費人們的時間。至于我們，則要欣然提名它為GameSpot評選出的歷史上最偉大游戲之一。為了懷念經典，也為了能夠給大多的計算機用戶在工作之余找到一個休閑、娛樂的一個方式,我們小組開始著手用VB語言開發一個經典的俄羅斯方塊游戲。關鍵字：游戲，模塊，多媒體。俄羅斯方塊俄羅斯方塊vb報告目錄TOC\o"1-5"\h\z摘要 I\o"CurrentDocument"目錄 II\o"CurrentDocument"第一章游戲概述 1\o"CurrentDocument"1.1游戲的功能與應用背景 11.1.1游戲功能 11.1.2游戲應用背景 1\o"CurrentDocument"1.1.3游戲特點 1\o"CurrentDocument"第二章游戲設計 2\o"CurrentDocument"2丄游戲設計思想 2\o"CurrentDocument"2.2游戲功能模塊劃分 22.2.1游戲功能模塊劃分 22.2.2Bitblt函數參數的意義與用法 22.1.3俄羅斯方塊的旋轉 32.1.4如何實現方自動消除滿行的方塊 32.2.5隨機從7個方塊中選擇一個 42.2.6設置每個模塊的測試計 4\o"CurrentDocument"2.3整體游戲程序的結構設計 5\o"CurrentDocument"第三章游戲實現 6\o"CurrentDocument"3.1界面設計 63.1.1藝術策劃 63.1.2頁面整體規劃 6\o"CurrentDocument"3.2代碼編寫 63.2.1游戲界面 63.1.2詳細代碼 7\o"CurrentDocument"3.3系統測試 133.3.1測試的必要性 133.3.2測試的過程 13\o"CurrentDocument"3.4相關軟件說明 13AdobePhotoshop 13VB6.0 13\o"CurrentDocument"第四章課程設計總結 15\o"CurrentDocument"4.1課程設計認識 15\o"CurrentDocument"4.2作品的不足之處 15\o"CurrentDocument"4.3作品的改進之處 16結 論 17\o"CurrentDocument"致謝 19\o"CurrentDocument"參考文獻 20第一章游戲概述1.1游戲的功能與應用背景1.1.1游戲功能游戲是用來給大家娛樂的，所以要能在使用的過程中給大家帶來快樂，消除大家的疲勞，所以我們在游戲中添加了漂亮的場景和動聽的音樂，激發大家的娛樂激情。我們開發的俄羅斯方塊游戲，主要實現了以下幾種功能：可以靈活控制方塊在圖形框中運動；游戲過程中方塊可以自由旋轉；當某一行的方塊排列滿時，將自動將這一行方塊消除，然后將上面所有方塊向下移動，可以支持連續消行。1.1.2游戲應用背景該游戲背景一非主流為主并且加入了作者圖片，伴隨著音樂進入游戲。帶著新鮮，帶著有趣激發大家的激情，找到快感。1.1.3游戲特點這個游戲給用戶提供了一種方便、快捷娛樂項目。使用此游戲可以讓人們達到休閑娛樂的目的。人們只需要一只手，按住上下左右鍵就可完成此游戲。沒有什么復雜的關數，沒有分數的限制。加入了可愛的背景圖片和音樂，就是吸引用戶來使用，但不至于沉迷。這就是我們設計即娛樂大眾有可以防沉迷的游戲。俄羅斯方塊vb報告俄羅斯方塊俄羅斯方塊vb報告第二章游戲設計2.1.游戲設計思想游戲功能的設計思路用框架圖來表示，如圖2.1用戶查詢框架圖所示:俄羅斯首頁返回首頁圖2.1用戶查詢框架圖游戲幫助退出俄羅斯首頁返回首頁圖2.1用戶查詢框架圖游戲幫助退出關于下落鍵盤旋轉移動2.2游戲功能模塊劃分2.2.1游戲功能模塊劃分該模塊總體上劃分為三個模塊，分別為游戲開始模塊、游戲退出模塊、幫助模塊。一個游戲必須是要有游戲規則的。其中的幫助就是教會我的玩法，以及其中的規則。2.2.2Bitblt函數參數的意義與用法函數功能：該函數對指定的源設備環境區域中的像素進行位塊bit_block)轉換，以傳送到目標設備環境。函數原型：BOOLBitBlt(HDChdcDest,intnXDest,intnYDest,intnWidth,intnHeight,HDChdcSrc,intnXSrc,intnYSrc,DWORDdwRop)；參數：dcDest:指向目標設備環境的句柄。nXDest:指定目標矩形區域左上角的X軸邏輯坐標。nYDest:指定目標矩形區域左上角的Y軸邏輯坐標。nWidth:指定源和目標矩形區域的邏輯寬度。nHeight:指定源和目標矩形區域的邏輯高度。hdcSrc:指向源設備環境的句柄。nXSrc:指定源矩形區域左上角的X軸邏輯坐標。nYSrc:指定源矩形區域左上角的Y軸邏輯坐標。光柵操作代碼：SrcCopy：將源矩形區域直接拷貝到目標矩形區域。dwRop：指定光柵操作代碼。這些代碼將定義源矩形區域的顏色數據，如何與目標矩形區域的顏色數據組合以完成最后的顏色。2.1.3俄羅斯方塊的旋轉俄羅斯方塊的旋轉主要將方塊的位置加以變換得到的，例如上述范例，長條型有兩中樣式，根據小方塊的編號變動來實現整個造型的旋轉，比如：IfJudge_RotateThenintRotate=intRotate+1SelectCaseType_NowCase1'長條IfintRotateMod2=1ThenpicPictureNow.Picture=LoadResPicture(12,0)picPictureNow.Top=picPictureNow.Top+3picPictureNow.Left=Adjust_LeftElsepicPictureNow.Picture=LoadResPicture(11,0)picPictureNow.Top=Adjust_ToppicPictureNow.Left=picPictureNow.Left+1EndIf2.1.4如何實現方自動消除滿行的方塊我們的這個俄羅斯方塊游戲主要是利用command控件的visible屬性完成效果的，其實在游戲區圖形框可以看成是由許多的command小方塊組成，方塊運動的過程就是造型里方塊顯示或者隱藏，就像現在的霓虹燈效果一樣，由時鐘控件控制visible屬性改變的速度，上一層的消失，下一層的顯示，這樣，從視覺效果可以看到方塊的下落運動效果。方塊在下落的過程中會自動判斷每一行方塊的visible屬性，如果全部為true時，就會將這一行小方塊的visible屬性全部變成false，在將上面的小方塊向下移動，利用for語句進行循環判斷，將所有這樣情況的行改變小方塊visible屬性。當有多行同時出現這樣情況時使用遞歸調用，實現連續消行。具體程序代碼如下：R_Value=picPictureNow.Top+1'MinYrx_value=picPictureNow.Top+picPictureNow.Height'MaxYFori=rx_valueToR_ValueStep-1IfTotal(1,i)AndTotal(2,i)AndTotal(3,i)AndTotal(4,i)AndTotal(5,i)AndTotal(6,i)AndTotal(7,i)AndTotal(8,i)AndTotal(9,i)AndTotal(10,i)Then'如果一行已經堆滿，則將此行上面的圖象全部向下移動一點k=BitBlt(picBackGround.hDC,0,20,200,(i-1)*20,picBackGround.hDC,0,0,vbSrcCopy)Forj=iTo1Step-1Fork=1To10Total(k,j)=Total(k,j-1)NextkNextji=i+1EndIfNexti2.2.5隨機從7個方塊中選擇一個使用Randomize函數來進行選擇。用number將Rnd函數的隨機數生成器初始化，該隨機數生成器給number一個新的種子值。例如：RandomizeType_Next=Int((7*Rnd)+1)SelectCaseType_NextCase1imgPictureNext.Picture=LoadResPicture(11,0)Case2imgPictureNext.Picture=LoadResPicture(13,0)Case3imgPictureNext.Picture=LoadResPicture(15,0)Case4imgPictureNext.Picture=LoadResPicture(19,0)Case5imgPictureNext.Picture=LoadResPicture(23,0)Case6imgPictureNext.Picture=LoadResPicture(27,0)Case7imgPictureNext.Picture=LoadResPicture(29,0)EndSelect2.2.6設置每個模塊的測試計在每個模塊中的某個控件功能代碼編寫完成后，需要將他們分別測試，以便及時發現問題，并及時調整問題，在該模塊中的所有控件的功能代碼都完成之后，需要對它的總體功能進行測試。如果出現問題，可以在該功能所在的代碼區中進行修改，多次測試，直到俄羅斯方塊俄羅斯方塊vb報告沒有錯誤為止。2.3整體游戲程序的結構設計1.進入游戲窗體一一一進入此窗體中，在菜單中有“新游戲”“退出”“鍵盤”“關于”。開始游戲了之后用戶可一按上下左右鍵來進行游戲。在幫助中有“鍵盤”和“關于”，可以幫助人們了解此游戲的方法與規則。2模塊一一主要對空件和要用到的函數進行了定義。如，BitBlt函數。3.相關文件一一主要在外部把方塊模型進行了繪制，在這里我們使用LoadResPicture()來調用。第三章游戲實現3.1界面設計3.1.1藝術策劃所有的編程工作都是很乏味的，但是要使這些變成變得富有人性化,使更多的人來接受它，那就一定要有藝術的氣息，以黑色為主的漫天繁星代表著浪漫，又具有科技的色彩，這樣就達到了一種把看似很一般的東西變的大方，自然，使它們更富有藝術效果3.1.2頁面整體規劃在編程時，需要遵循界面設計的基本原則。（1）用戶至上：編制出來的程序是要給用戶使用的，因此在界面設計時一定要先考慮用戶在使用時的方便原則；（2）界面元素的一致性：包括窗體圖標的一致性，控件選擇的一致性，色彩搭配的一致性，以及程序中不同窗口樣式的一致性等；（3）簡單性；（4）顏色和字體；（5）圖片和圖標在遵循這個原則的基礎上，需要保證各個模塊中的字體、顏色、大小、背景圖象等的一致性，還要符合該查詢系統的整體特點，使之做到各方面都兼顧的效果。3.2代碼編寫3.2.1游戲界面進入窗體，界面的作用是使用戶進入“俄羅斯方塊”，如圖3.1游戲首頁進入界面：圖3.1游戲首頁進入界面當開始游戲時，界面上的方塊開始向下移動。如圖3.2游戲操作進入界面:如圖3.2游戲操作進入界面游戲規則介紹界面，如圖3.3游戲規則進入界面:如圖3.3游戲規則進入界面3.1.2詳細代碼窗體frmform的主要代碼DimType_NowAsInteger'目前方塊的類型DimType_NextAsInteger'下個方塊的類型DimintRotateAsInteger'方塊旋轉的狀態SubGlobal_Init()picBackGround.ClsimgPictureNext.Picture=LoadPicture("")picPictureNow.Visible=FalsetmrDrop.Enabled=FalseEndSubSubInit()'每個方塊的初始化過程picPictureNow.Visible=FalsetmrDrop.Enabled=FalseType_Now=Type_NextpicPictureNow.Picture=imgPictureNext.PictureimgPictureNowBackup.Picture=picPictureNow.PictureSel_NextintRotate=0picPictureNow.Left=4picPictureNow.Top=0picPictureNow.Visible=TruetmrDrop.Enabled=TrueEndSubSubJudge_Full()'判斷是否堆滿R_Value=picPictureNow.Top+1'MinYrx_value=picPictureNow.Top+picPictureNow.Height'MaxYFori=rx_valueToR_ValueStep-1IfTotal(1,i)AndTotal(2,i)AndTotal(3,i)AndTotal(4,i)AndTotal(5,i)AndTotal(6,i)AndTotal(7,i)AndTotal(8,i)AndTotal(9,i)AndTotal(10,i)Then'如果一行已經堆滿，則將此行上面的圖象全部向下移動一點k=BitBlt(picBackGround.hDC,0,20,200,(i-1)*20,picBackGround.hDC,0,0,vbSrcCopy)Forj=iTo1Step-1Fork=1To10俄羅斯方塊俄羅斯方塊vb報告Total(k,j)=Total(k,j-1)NextkNextji=i+1EndIfNexti '如果目前方塊的頂點位置<=0，則表示全部堆滿IfpicPictureNow.Top<=0ThenSelectCaseMsgBox("你玩完了！想再試試身手嗎？",4+32)CasevbYesmnuGameNew_ClickCaseElseGlobal_InitEndSelectEndIfEndSubSubSel_Next()'隨機從7個放塊中選擇一個RandomizeType_Next=Int((7*Rnd)+1)SelectCaseType_NextCase1imgPictureNext.Picture=LoadResPicture(11,0)Case2imgPictureNext.Picture=LoadResPicture(13,0)Case3imgPictureNext.Picture=LoadResPicture(15,0)Case4imgPictureNext.Picture=LoadResPicture(19,0)Case5imgPictureNext.Picture=LoadResPicture(23,0)Case6imgPictureNext.Picture=LoadResPicture(27,0)Case7imgPictureNext.Picture=LoadResPicture(29,0)EndSelectimgPictureNext.Move(picPictureNextBackGround.Width-imgPictureNext.Width)\2-30,(picPictureNextBackGround.Height-imgPictureNext.Height)\2-30EndSubPrivateSubcmdDisplay_Click()imgPictureNext.Visible=Not(imgPictureNext.Visible)IfimgPictureNext.VisibleThencmdDisplay.Caption="隱藏(&D)"ElsecmdDisplay.Caption="顯示(&S)"EndIfEndSubPrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)'改變Case的KeyCode值就可以改變鍵盤控制按鈕SelectCaseKeyCodeCasevbKeyLeftIfpicPictureNow.Left-1>=0ThenJ_Value=JudgeX_LeftIfJ_ValueThenpicPictureNow.Picture=imgPictureNowBackup.Picturer=BitBlt(picPictureTemp.hDC,0,0,picPictureNow.Width*20,picPictureNow.Height*20,picBackGround.hDC,(picPictureNow.Left-1)*20,picPictureNow.Top*20,vbSrcCopy)picPictureNow.Left=picPictureNow.Left-1r=BitBlt(picPictureNow.hDC,0,0,picPictureNow.Width*20,picPictureNow.Height*20,picPictureTemp.hDC,0,0,vbSrcAnd)EndIfEndIfCasevbKeyRightIfpicPictureNow.Left+picPictureNow.Width<picBackGround.ScaleWidthThenJ_Value=JudgeX_RightIfJ_ValueThenpicPictureNow.Picture=imgPictureNowBackup.Picturer=BitBlt(picPictureTemp.hDC,0,0,picPictureNow.Width*20,picPictureNow.Height*20,picBackGround.hDC,(picPictureNow.Left+1)*20,picPictureNow.Top*20,vbSrcCopy)picPictureNow.Left=picPictureNow.Left+1r=BitBlt(picPictureNow.hDC,0,0,picPictureNow.Width*20,picPictureNow.Height*20,picPictureTemp.hDC,0,0,vbSrcAnd)EndIfEndIfCasevbKeyDowntmrDrop_TimerCasevbKeyUpIfJudge_RotateThenintRotate=intRotate+1SelectCaseType_NowCase1'長條IfintRotateMod2=1ThenpicPictureNow.Picture=LoadResPicture(12,0)picPictureNow.Top=picPictureNow.Top+3picPictureNow.Left=Adjust_LeftElsepicPictureNow.Picture=LoadResPicture(11,0)picPictureNow.Top=Adjust_ToppicPictureNow.Left=picPictureNow.Left+1EndIfCase2'2字IfintRotateMod2=1ThenpicPictureNow.Picture=LoadResPicture(14,0)picPictureNow.Top=Adjust_TopElsepicPictureNow.Picture=LoadResPicture(13,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftEndIfCase3'7字SelectCaseintRotateMod4Case0picPictureNow.Picture=LoadResPicture(15,0)picPictureNow.Top=Adjust_TopCase1picPictureNow.Picture=LoadResPicture(16,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftCase2picPictureNow.Picture=LoadResPicture(17,0)picPictureNow.Top=Adjust_TopCase3picPictureNow.Picture=LoadResPicture(18,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftEndSelectCase4'T字SelectCaseintRotateMod4Case0picPictureNow.Picture=LoadResPicture(19,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftCase1picPictureNow.Picture=LoadResPicture(20,0)picPictureNow.Top=Adjust_TopCase2picPictureNow.Picture=LoadResPicture(21,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftCase3picPictureNow.Picture=LoadResPicture(22,0)picPictureNow.Top=Adjust_TopEndSelectCase5'反7字SelectCaseintRotateMod4Case0picPictureNow.Picture=LoadResPicture(23,0)picPictureNow.Top=Adjust_TopCase1picPictureNow.Picture=LoadResPicture(24,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftCase2俄羅斯方塊俄羅斯方塊vb報告picPictureNow.Picture=LoadResPicture(25,0)picPictureNow.Top=Adjust_TopCase3picPictureNow.Picture=LoadResPicture(26,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftEndSelectCase6'反2字IfintRotateMod2=1ThenpicPictureNow.Picture=LoadResPicture(28,0)picPictureNow.Top=Adjust_TopElsepicPictureNow.Picture=LoadResPicture(27,0)picPictureNow.Top=picPictureNow.Top+1picPictureNow.Left=Adjust_LeftEndIfEndSelectimgPictureNowBackup.Picture=picPictureNow.PictureEndIfEndSelectEndSubPrivateSubmnuGameAbout_Click()MsgBox"旋轉俄羅斯",vbInformationEndSubPrivateSubmnuGameExit_Click()EndEndSubPrivateSubmnuGameNew_Click()'將10x20的坐標全部設置為空Fori=1To10Forj=0To20Total(i,j)=FalseNextjNextiCurX=0picBackGround.Cls'改變tmrDrop的Interval值即可改變游戲速度tmrDrop.Interval=1000Sel_NextInitEndSubPrivateSubmnuHelpKey_Click()MsgBox”鍵盤控制方法："+vbCrLf+"-控制方塊向左移動；"_+vbCrLf+"-控制方塊向右移動；"_+vbCrLf+"!控制方塊向下快速移動；”—+vbCrLf+"t控制方塊的順時針方向的翻轉。",64,"旋轉俄羅斯1.0鍵盤操作幫助"EndSubPrivateSubtmrDrop_Timer()'方塊下落JudgeYpicPictureNow.Picture=imgPictureNowBackup.Picturer=BitBlt(picPictureTemp.hDC,0, 0,picPictureNow.Width* 20,picPictureNow.Height*20,picBackGround.hDC,picPictureNow.Left*20,(picPictureNow.Top+1)*20,vbSrcCopy)picPictureNow.Top=picPictureNow.Top+1r=BitBlt(picPictureNow.hDC,0, 0,picPictureNow.Width* 20,picPictureNow.Height*20,picPictureTemp.hDC,0,0,vbSrcAnd)DoEventsIfpicPictureNow.Top+picPictureNow.Height>picBackGround.ScaleHeightThenInitEndSub3.3系統測試3.3.1測試的必要性通過測試可以幫助我們更好的編程，及時發現其中的問題，及時進行修改，通過測試功能可以知道我們已經編完的部分的功能實現方面存在的問題及可實現性。通過測試我使我的程序更加完善，通過多次測試，可以更好的幫助我們了解我們的程序，因此測試步驟是我們在編程時必須的很重要的一步。每一個程序都是由多次測試后才能夠正常運行的。在一個大的編程中，需要對每一個小的過程都認真編程次的調試，因為在一個程序中經常會因為一個小小的錯誤影響到整個程序的運行。下來進入修改，調試階段，這個過程是看程序是否能正常運行的最重要的階段，也許一個小的部分要經過好幾十次甚至上百次的修改和調試，但在這時一定要有耐心，要不就會前功盡棄。3.3.2測試的過程一個大的程序是由很多小的模塊組成的，在所有的模塊功能代碼編寫完成之后，就可以進入測試過程了，因為一個大的程序是由許多小的模塊組成的，所以要先對這些小的模塊進行測試，以減化以后工作中遇到的問題。然后對整個程序進行測試，主要步驟就是讓自己的程序運行，通過調試窗口，查找代碼程序中是否存在錯誤，對總體的過程進行測試，測試它的代碼不存在錯誤之后,還需要保證能夠實現所需要的功能，通過他的功能，如果功能不好用，需要進行查找是否存在運行錯誤之類的錯誤，通過在測試過程中對其進行逐一修改,直到程序中不存在任何錯誤為止，測試過程結束。3.4相關軟件說明3.4.1AdobePhotoshopAdobePhotoshop是在PC與MPC上運行的圖像編輯應用程序，由Adobe公司1990年首次推出，1994年以后，隨著Adobe公司的迅速發展，Photoshop軟件的自身功能也隨之不斷更新完善，1996年，Adobe公司推出了Photoshop4.0版本，既而，最近推出了具有超前的圖像編輯功能的PhotoshopCS，其強大的新功能可以滿足每一位用戶的需要，使成為當今一流的圖像處理與圖像設計工具,同時也是標準圖像編輯解決方案。PhotoshopCS提供了色彩調整、圖像修飾和各種濾鏡效果等功能，用戶可以將掃描進來的圖片或者其他格式的圖像處理為所需要的其他效果。3.4.2VB6.0VB6.0是Microsoft公司推出的VisualStudio.Net可視化應用程序開發工具組中的一個重要成員。是基于.Net的可視化應用程序開發工具，其中包括VB.NET,VISUALC++.NET,VisualC#.Net等開發工具。它VB.NET通過公共語言運行環境，將VISUALC++.NET,VisualC#.Net等應用程序開發工具緊密地集成在一起，使它們共同使用同一個集成開發環境，并使用同一個基礎類庫，應用它更易于編寫分布式應用程序，在其中還刪除了某些傳統的關鍵字，提高了類型安全性，并公開了高級人員需要的低級別構造。俄羅斯方塊vb報告俄羅斯方塊俄羅斯方塊vb報告第四章課程設計總結4.1課程設計認識課程設計是VB學習中的一個十分重要的環節。通過課程設計，我能夠得到系統的技能訓練，從而更進一步地鞏固和加強了以前在課堂上所學的專業理論知識，提高了我們綜合運用VB.NET軟件的運用能力，使我們具有扎實的理論基礎知識和獨立動手的能力。獨立地以自己的想法作各具有特色的課程設計，知識的應運過程就是一個熟練的過程，在親自實踐后才能了解到其中的實際問題,從而在解決問題中掌握更多實用的知識，并鞏固和加強所學的專業理論知識。這樣才能在走入工作崗位后更好地將學到的知識應運到實際開發中去。課程設計是不同與我們的實訓的，通過課程設計要求我們編出一個程序，并且它是與我們以后的畢業設計相對應的，通過兩周的課程設計，我們每一個人，需要根據自己的能力和愛好，使用程序設計軟件編制出一個可以成功運行的程序。相對來說，課程設計對于我們來說更加重要，通過課程設計能夠反映出一個人的綜合素質，和綜合知識水平，它需要我們具有多方面的知識，并且要集中應用。例如這次課程設計，需要每一個人根據自己的選擇，編一個程序。從界面的設計到程序代碼的編輯，都需要我們自己來編寫。程序的界面需要我們利用我們所學的關于色彩構成方面的知識，使界面看起來更加美觀，大方，對于界面的設計我們還需要我們需要使用各種平面圖像處理軟件，對圖形圖像進行編輯。主要使用的軟件包括Photoshop軟件對圖片進行修改和裁切，將裁切好的圖片應用到程序模塊的界面。課程設計要求我們做每一個過程都需要特別的認真，因為在編程過程中一個小小的錯誤經常能夠導致，整個程序無法運行，并且我們需要經常調試，測試看它是否可以運行，如果有錯誤需要及時修改，在每次遇到錯誤是，要勇于面對不能逃避，你逃避一個小錯誤可能會導致，在最終效果時，很難找到錯誤，就不能很好的修改它們，為了給自己制造方便我們應該養成良好的編程習慣，既能節省時間又可以提高我們的工作效率。通過這兩周的VB課程設計，我學到了許多在課堂上根本學不到的東西，而且利用VB的相關知識編出了自己所設計的內容。知識的應運過程就是一個熟練的過程，在親自實踐后才能了解到其中的實際問題，從而在解決問題中掌握更多實用的知識，并鞏固和加強所學的專業理論知識。這樣才能在走入工作崗位后更好地將學到的知識應運到實際開發中去。4.2作品的不足之處在這次VB課程設計開始之前，由于我把VB課程設計看的太簡單，沒有做好充分的準備工作，使我在課程設計中遇到了很多困難。在課程設計過程中，由于經驗不足，我的程序最初出現了很多問題。首先，就是方塊的模型就沒有準備好。還好書中又我們需要的素材，這樣就省去了我們的麻煩。之后我們就是編寫程序了。在這里我們遇到了很多問題,好多都是我們還沒又深入了解的內容。比如說:Bliblt函數，它是指定的源設備環境區域中的像素進行位塊(bit_block)轉換，以傳送到目標設備環境。函數原型：BOOLBitBlt(HDChdcDest,intnXDest,intnYDest,intnWidth,intnHeight,HDChdcSrc,intnXSrc,intnYSrc,DWORDdwRop)；其中的含義我們就摸不到頭腦。在老師的幫助下才得以明白。在方塊堆滿消除，隨機選擇方塊的時候都出現了問題。隨機函數就是使用Randomize函數來進行選擇。用number將Rnd函數的隨機數生成器初始化，該隨機數生成器給number一個新的種子值。雖然理論上得以明白，具體實現還是困難重重。雖然外觀上很漂亮，美中不足的就是這個游戲本身就不是很完善，沒有過關，得分記錄的模塊。4.3作品的改進之處在這次VB課程設計中我做的是俄羅斯方塊游戲，雖然存在著很多的問題，但是我還是由衷的感到欣慰，因為我自己第一次根據自己的想法編出了程序。但是我的這個游戲還有很多地方值得改進。俄羅斯方塊游戲我認為還是很有趣的，但是我沒有做好充分的需求分析和詳細的模塊設計，所以編程的各個控件之間顯得很凌亂，使以后的測試修改工作做起來很不容易。對于界面方面的設計沒有把握好，總認為只要程序編出來能運行就大功告成了，但忽略了最主要的一點，那就是我們編的程序是要用戶能夠理解，能夠充分的使用，界面設計的要和這個游戲的主題和內容相對應，要不然會給用戶帶來錯覺或其他不舒服的感覺。如果這樣的話，再完美的編程也是一個失敗的作品，對于一個游戲程序需要的不僅是技術方面的，更加需要俄羅斯方塊俄羅斯方塊vb報告你有一個可以吸引人的地方，對于目前上，很多的關于游戲方面的代碼，可以說你到網上可以搜索到很多的，沒有一個游戲是不好用的，如 何能夠在這其中立足，如何能夠給別人一個好的印象非常重要，因此我想，我 的作品更加需要改進的地方就是，使界面更加吸引人，讓人在看著眼花繚亂之時，能夠一下子就選擇使用我的。因此我認為我的界面沒有達到期望的目的。 還有就是我技術方面的問題，不足的地方太多了，改進的地方就是越多。我的游戲里面方塊不會增加速度下落，沒有計算分數的功能，沒有級數的約束。所以如果可以把這些都加上，結合在一起，一定是完美中的完美。 每個控件之間的正確聯系是很重要的，每按一次鼠標，鍵盤都可完美的執行自己的任務。這點我想我是達到了。 雖然我的作品完成了，對自己有這樣的一個成果感到還不錯，但是從這次VB課程設計中，我得到的很多經驗，我深感我的作品還需要在多方面進行改進, 如果把這些不足的地方進行改進，我相信這個作品會更完美的。 在兩周中我們進行了VB課程設計。這是我第一次系統地，完整的接觸軟件設計的全過程。我們組的題目是“俄羅斯方塊游戲”的設計。我在組內主要負責⑴游戲界面的設計;⑵俄羅斯方塊的造型;⑶游戲級別的自由選擇;⑷游戲的背景音樂。在這次課程設計中，我的能力得到了鍛煉，自己也有許多體會。這次的課程設計是自己第一次全面接觸軟件的制作過程。以前僅僅是對軟件的開發有一個大體的印象，通過這次的課程設計，我對軟件的開發有了切身的體會。軟件并不像我原來所想的那樣十分神秘，而是有著一個相對固定的模式和流程。 我們只要按照這個模式和流程，就能夠比較規范的完成一個軟件的制作。軟件的制作是一個系統的工程，需要我們掌握多方面的知識。在這次課程設計中， 我覺得自己的知識面還是有欠缺的。需要在以后的學習中加以注意，要全面的提咼自己的知識面與知識層次。我在這次課程設計中主要負責⑴游戲界面的設計