2017畢業(yè)論文-基于c語言的掃雷游戲開發(fā)

1、<p>　　基于C語言的掃雷游戲開發(fā)</p><p><b>　　摘 要</b></p><p>　　本論文研究的是以Visual Basic 6.0為開發(fā)環(huán)境，設(shè)計(jì)并開發(fā)一款掃雷游戲，其功能類似于Windows操作系統(tǒng)自帶的掃雷游戲。論文首先介紹了制作游戲的整體思路及整個(gè)游戲設(shè)計(jì)的流程規(guī)劃，然后介紹了雷區(qū)的布置及地雷隨機(jī)產(chǎn)生的實(shí)現(xiàn)方法；重點(diǎn)介紹了在游戲過程

2、中各事件的處理，其中又以鼠標(biāo)事件和清除未靠近地雷區(qū)方塊這兩方面最為最要，鼠標(biāo)事件是利用鼠標(biāo)所發(fā)出的信息了解使用者的意圖，進(jìn)而做出相對(duì)應(yīng)的動(dòng)作，而清除未靠近地雷區(qū)方塊由于引進(jìn)了“遞歸”這個(gè)概念而使其簡(jiǎn)單化。</p><p>　　本次設(shè)計(jì)只是完成了掃雷游戲的基本功能，在細(xì)節(jié)方面仍有待以后完善。</p><p>　　關(guān)鍵詞：掃雷；Visual Basic 6.0；事件；遞歸</p>

3、<p>　　The Design and Development of Mine Game</p><p><b>　　Abstract</b></p><p>　　What my thesis research for is basic on the develop environment of Visual Basic 6.0 , design an

4、d develop a mine game,its function is similar to the mine games of the Windows Operating System .The thesis has introduced the layout of mined areas and the method of how to create the mines at random. It use vairies of

5、components in Visual Basic 6.0 and the combination of some simple calculations; the thesis lays emphasis on introducing the processing of each event in the game. Among these events ,th</p><p>　　This design h

6、as been completed the basic function of mine game. The details still need to be improved.</p><p>　　Key words: Mine game, Visual Basic 6.0, Affairs, Recursion</p><p><b>　　目 錄</b><

7、/p><p><b>　　論文總頁數(shù)：18頁</b></p><p><b>　　1引言1</b></p><p>　　1.1課題背景及意義1</p><p>　　1.2開發(fā)工具的選用及介紹1</p><p>　　2游戲的總體分析與設(shè)計(jì)3</p><

8、;p><b>　　2.1設(shè)計(jì)構(gòu)想3</b></p><p><b>　　2.2流程規(guī)劃4</b></p><p><b>　　2.3畫面規(guī)劃5</b></p><p>　　3游戲的詳細(xì)設(shè)計(jì)6</p><p>　　3.1游戲初始化6</p><

9、;p>　　3.2雷區(qū)的布置9</p><p>　　3.3游戲中主要模塊的介紹與使用10</p><p>　　3.3.1鼠標(biāo)事件10</p><p>　　3.3.2地雷及雷區(qū)表面探測(cè)情況12</p><p>　　3.3.3清除未靠近地雷的方塊12</p><p>　　3.3.4游戲難度的選擇14<

10、/p><p>　　3.4游戲的判斷14</p><p>　　3.4.1游戲成功完成14</p><p>　　3.4.2游戲失敗14</p><p>　　4游戲測(cè)試結(jié)果15</p><p><b>　　結(jié) 論15</b></p><p><b>　　參

11、考文獻(xiàn)16</b></p><p><b>　　引言</b></p><p><b>　　課題背景及意義</b></p><p>　　在計(jì)算機(jī)逐步滲入社會(huì)生活各個(gè)層面的今天，計(jì)算機(jī)已經(jīng)成為人們?nèi)粘Ｉ囊徊糠?，越來越多的人使用?jì)算機(jī)辦公、娛樂等等。</p><p>　　掃雷游戲是Wind

12、ows操作系統(tǒng)自帶的一款小游戲，在過去的幾年里，Windows操作系統(tǒng)歷經(jīng)數(shù)次換代更新，變得越來越龐大、復(fù)雜，功能也越來越強(qiáng)大，但是這款小游戲依然保持原來的容貌，可見這款小游戲受到越來越多人的喜愛。本次的畢業(yè)設(shè)計(jì)我將利用Visual Basic6.0作為開發(fā)工具，開發(fā)一款類似的“掃雷游戲”。</p><p>　　通過研究Windows操作系統(tǒng)自帶的掃雷游戲，我們可以發(fā)現(xiàn)在這個(gè)游戲中主要有以下兩個(gè)關(guān)鍵的地方：<

13、;/p><p>　　第一個(gè)是初始化問題，包括隨機(jī)產(chǎn)生本局游戲中雷的總數(shù)，雷的分布對(duì)于每一個(gè)小區(qū)域如何獲取周圍地區(qū)分布的雷數(shù)等等。</p><p>　　第二就是對(duì)鼠標(biāo)事件的處理問題，既在游戲過程中對(duì)鼠標(biāo)事件應(yīng)如何做出反應(yīng)。</p><p>　　經(jīng)過四年的大學(xué)學(xué)習(xí)，我對(duì)理論知識(shí)已經(jīng)有了一定的了解與認(rèn)知，本次的畢業(yè)設(shè)計(jì)便是將書本上所學(xué)的理論知識(shí)與實(shí)際相結(jié)合，同時(shí)也是對(duì)所學(xué)知識(shí)

14、的一種檢查，希望通過本次的畢業(yè)設(shè)計(jì)使自己在程序的開發(fā)和設(shè)計(jì)上有新的認(rèn)識(shí)并能有所提高。本次畢業(yè)設(shè)計(jì)既鍛煉了我們的實(shí)際動(dòng)手能力，又在老師的指導(dǎo)下進(jìn)行了一次模擬實(shí)際產(chǎn)品的開發(fā)，對(duì)于我們以后工作能力的培養(yǎng)具有重要意義。</p><p>　　開發(fā)工具的選用及介紹</p><p>　　Visual Basic（VB）是一種由微軟公司開發(fā)的包含協(xié)助開發(fā)環(huán)境的事件驅(qū)動(dòng)編程語言。從任何標(biāo)準(zhǔn)來說，VB都是世界

15、上使用人數(shù)最多的語言——不僅是盛贊VB的開發(fā)者還是抱怨VB的開發(fā)者的數(shù)量。它源自于BASIC編程語言。VB擁有圖形用戶界面（GUI）和快速應(yīng)用程序開發(fā)（RAD）系統(tǒng)，可以輕易的使用DAO、RDO、ADO連接數(shù)據(jù)庫，或者輕松的創(chuàng)建ActiveX控件。程序員可以輕松的使用VB提供的組件快速建立一個(gè)應(yīng)用程序。</p><p>　　1991年，微軟公司推出了Visual Basic 1.0版。這在當(dāng)時(shí)引起了很大的轟動(dòng)。這

16、個(gè)連接編程語言和用戶界面的進(jìn)步被稱為Tripod（有些時(shí)候叫做Ruby），最初的設(shè)計(jì)是由阿蘭·庫珀（Alan Cooper）完成的。許多專家把VB的出現(xiàn)當(dāng)做是軟件開發(fā)史上的一個(gè)具有劃時(shí)代意義的事件。其實(shí)，以我們現(xiàn)在的目光來看，VB1.0的功能實(shí)在是太弱了；（不過最近VB6.0, VB.NET的功能相當(dāng)大?。?。但在當(dāng)時(shí)，它是第一個(gè)“可視”的編程軟件。這使得程序員欣喜之極，都嘗試在VB的平臺(tái)上進(jìn)行軟件創(chuàng)作。微軟也不失時(shí)機(jī)地在四年內(nèi)

17、接連推出VB2.0，VB3.0，4.0三個(gè)版本。并且從VB3開始，微軟將ACCESS的數(shù)據(jù)庫驅(qū)動(dòng)集成到了VB中，這使得VB的數(shù)據(jù)庫編程能力大大提高。從VB4開始，VB也引入了面向?qū)ο蟮某绦蛟O(shè)計(jì)思想。VB功能強(qiáng)大，學(xué)習(xí)簡(jiǎn)單。而且，VB還引入了“控件”的概念，使得大量已經(jīng)編好的VB程序可以被我們直接拿來使用。VB1.0的DOS版本VB1.0于1991年發(fā)布。這個(gè)連接編程語言和用戶界面的進(jìn)步被稱為Tripod（有些時(shí)候叫做Ruby），最初的設(shè)

18、計(jì)是由阿蘭·庫珀（Alan Cooper</p><p>　　VB 2005的“顯著”優(yōu)點(diǎn)是，可以直接編寫出XP風(fēng)格的按鈕，以及其他的控件。但是其編寫的小程序占用近10MB的內(nèi)存。通過幾年的發(fā)展，它已成為一種專業(yè)化的開發(fā)語言和環(huán)境。用戶可用Visual Basic快速創(chuàng)建Windows程序，現(xiàn)在還可以編寫企業(yè)水平的客戶端/服務(wù)器程序及強(qiáng)大的數(shù)據(jù)庫應(yīng)用程序。VB會(huì)吸引更多的贊譽(yù)和批評(píng)，也會(huì)繼續(xù)為廣大的用戶

19、和程序員使用。它非常適合用來開發(fā)擁有友好界面的程序（比如針對(duì)終端的數(shù)據(jù)），但是不適合開發(fā)其它程序（比如聯(lián)合計(jì)算程序）。</p><p>　　一個(gè)典型的VB進(jìn)程VB的中心思想就是要便于程序員使用，無論是新手或者專家。VB使用了可以簡(jiǎn)單建立應(yīng)用程序的GUI系統(tǒng)，但是又可以開發(fā)相當(dāng)復(fù)雜的程序。VB的程序是一種基于窗體的可視化組件安排的聯(lián)合，并且增加代碼來指定組建的屬性和方法。因?yàn)槟J(rèn)的屬性和方法已經(jīng)有一部分定義在了組件

20、內(nèi)，所以程序員不用寫多少代碼就可以完成一個(gè)簡(jiǎn)單的程序。過去的版本里面VB程序的性能問題一直被放在了桌面上，但是隨著計(jì)算機(jī)速度的飛速增加，關(guān)于性能的爭(zhēng)論已經(jīng)越來越少。</p><p>　　窗體控件的增加和改變可以用拖放技術(shù)實(shí)現(xiàn)。一個(gè)排列滿控件的工具箱用來顯示可用控件（比如文本框或者按鈕]]。每個(gè)控件都有自己的屬性和事件。默認(rèn)的屬性值會(huì)在控件創(chuàng)建的時(shí)候提供，但是程序員也可以進(jìn)行更改。很多的屬性值可以在運(yùn)行時(shí)候隨著用戶

21、的動(dòng)作和修改進(jìn)行改動(dòng)，這樣就形成了一個(gè)動(dòng)態(tài)的程序。舉個(gè)例子來說：窗體的大小改變事件中加入了可以改變控件位置的代碼，在運(yùn)行時(shí)候每當(dāng)用戶更改窗口大小，控件也會(huì)隨之改變位置。在文本框中的文字改變事件中加入相應(yīng)的代碼，程序就能夠在文字輸入的時(shí)候自動(dòng)翻譯或者阻止某些字符的輸入。VB的程序可以包含一個(gè)或多個(gè)窗體，或者是一個(gè)主窗體和多個(gè)子窗體，類似于操作系統(tǒng)的樣子。有很少功能的對(duì)話框窗口（比如沒有最大化和最小化按鈕的窗體）可以用來提供彈出功能。 VB

22、的組件既可以擁有用戶界面，也可以沒有。這樣一來服務(wù)器端程序就可以處理增加的模塊。</p><p>　　VB使用參數(shù)計(jì)算的方法來進(jìn)行垃圾收集，這個(gè)方法中包含有大量的對(duì)象，提供基本的面向?qū)ο笾С?。因?yàn)樵絹碓蕉嘟M建的出現(xiàn)，程序員可以選用自己需要的擴(kuò)展庫。和有些語言不一樣，VB對(duì)大小寫不敏感，但是能自動(dòng)轉(zhuǎn)換關(guān)鍵詞到標(biāo)準(zhǔn)的大小寫狀態(tài)，以及強(qiáng)制使得符號(hào)表入口的實(shí)體的變量名稱遵循書寫規(guī)則。默認(rèn)情況下字符串的比較是對(duì)大小寫敏感的

23、，但是可以關(guān)閉這個(gè)功能。 VB使得大量的外界控件有了自己的生存空間。大量的第三方控件針對(duì)VB提供。VB也提供了建立、使用和重用這些控件的方法，但是由于語言問題，從一個(gè)應(yīng)用程序創(chuàng)建另外一個(gè)并不簡(jiǎn)單。</p><p>　　在討論Visual Basic時(shí)，經(jīng)常可以聽到以下這些術(shù)語，因此對(duì)這些術(shù)語的基本理解十分有幫助。</p><p>　　控件——簡(jiǎn)單的說，控件就是構(gòu)成或者說建造Visual B

24、asic應(yīng)用程序的圖形化工具，包括窗體、按鈕、復(fù)選框、列表框、數(shù)據(jù)控件、表格控件和圖片控件等等...。</p><p>　　事件——由用戶或操作系統(tǒng)引發(fā)的動(dòng)作。事件的示例有擊鍵、單擊鼠標(biāo)(Click)、雙擊鼠標(biāo)(DblClick)、一段時(shí)間的限制，或從端口接收數(shù)據(jù)。</p><p>　　方法——嵌入在對(duì)象定義中的程序代碼，它定義對(duì)象怎樣處理信息并響應(yīng)某事件。例如，數(shù)據(jù)庫對(duì)象有打開紀(jì)錄集并從

25、一個(gè)記錄移動(dòng)到另一個(gè)記錄的方法程序的基本元素，它含有定義其特征的屬性，定義其任務(wù)和識(shí)別它可以響應(yīng)的事件的方法?？丶痛绑w是Visual Basic中所有對(duì)象的示例。</p><p>　　對(duì)象——一個(gè)控件、窗體等都可被看作一個(gè)對(duì)象。</p><p>　　過程——為完成某些特定的任務(wù)而編寫的代碼段，過程通常用于響應(yīng)特定的事件，也可以當(dāng)作應(yīng)用程序的用戶自定義函數(shù)來使用。</p>&

26、lt;p>　　屬性——屬性是組成用戶界面的各對(duì)象的性質(zhì)的具體描述。例如上述“對(duì)象”中所提到的尺寸、位置、顏色、寬度、高度等等都稱為控件的 屬性。屬性決定對(duì)象的外觀，有時(shí)也決定對(duì)象的行為。對(duì)象的屬性絕大部分是VB中已經(jīng)事先定義好的，但也有的屬性是需要在應(yīng)用 過程中才去定義的。屬性即可為對(duì)象提供數(shù)據(jù)，也能從對(duì)象取回信息。</p><p>　　隨著Intemet的迅猛發(fā)展，Microsoft的ActiveX技術(shù)出

27、現(xiàn)了，并被不失時(shí)機(jī)地加入到 Visual Basic 5．0版本中(1997年)。在1998年，Microsoft推出了Visual Basic 6．0版本，這一版本使VB得到了很大的擴(kuò)充和增強(qiáng)。它還引入了使用部件編程的概念，實(shí)際上這是對(duì)面向?qū)ο缶幊趟枷氲臄U(kuò)展。迄今為止，Visual Basic已經(jīng)發(fā)展成為快速應(yīng)用程序開發(fā)(RAD，Rapid Application Development)工具的代表。</p><p

28、>　　游戲的總體分析與設(shè)計(jì)</p><p><b>　　設(shè)計(jì)構(gòu)想</b></p><p><b>　　2.2 流程規(guī)劃</b></p><p>　　流程規(guī)劃大致上可以分為三個(gè)部分，分別為：畫面初始、游戲者按下第一個(gè)方塊和為非地雷方塊時(shí)展開。</p><p>　　畫面初始時(shí)，以游戲者最后一次設(shè)定

29、的地雷區(qū)大小為范圍畫出地雷區(qū)，但此時(shí)并未產(chǎn)生地雷。當(dāng)游戲者按下第一個(gè)方塊時(shí)產(chǎn)生地雷資料并啟動(dòng)定時(shí)器，為何在游戲者按下第一個(gè)方塊才產(chǎn)生地雷資料呢？其主要的用意在于不要讓游戲者第一次就踩到地雷，這樣在某種程度上可以提高游戲者游玩的氣氛。接著就是如何判斷按下的方塊是非地雷時(shí)的處理，這也是整個(gè)游戲的技術(shù)核心，我們可以通過遞歸的觀念來檢查周邊的方塊是否含有地雷及是否繼續(xù)往外翻開。</p><p>　　流程規(guī)劃如圖1所示：&

30、lt;/p><p><b>　　圖1整體流程規(guī)劃圖</b></p><p><b>　　2.3畫面規(guī)劃</b></p><p>　　畫面規(guī)劃如圖2所示：</p><p><b>　　圖2規(guī)劃樣圖</b></p><p><b>　　說明如下：<

31、;/b></p><p>　?、伲河螒虼翱冢‵orm）。為了避免因改變窗口大小而造成畫面呈現(xiàn)不美觀，在這里將BorderStyle屬性設(shè)定為3（雙線固定對(duì)話框），即無法以窗口邊緣進(jìn)行窗口大小調(diào)整。</p><p>　?、冢旱乩讛?shù)顯示區(qū)（PictureBox）。</p><p>　?、郏河螒驙顟B(tài)(Image)。</p><p>　　④：游

32、戲時(shí)間顯示區(qū)(PictureBox)。</p><p>　?、荩河?jì)數(shù)及狀態(tài)區(qū)(PictureBox)。</p><p>　?、蓿旱貓D區(qū)圖樣(Image)。</p><p>　?、撸旱乩讌^(qū)(PictureBox)。</p><p>　?、啵捍鎯?chǔ)圖片的組件，包括游戲狀態(tài)圖片、地雷區(qū)圖片、地雷數(shù)及秒數(shù)數(shù)字圖片(Imagelist)。</p&g

33、t;<p>　　⑨：秒數(shù)控制(Timer)。</p><p><b>　　游戲的詳細(xì)設(shè)計(jì)</b></p><p><b>　　游戲初始化</b></p><p>　　當(dāng)玩家開始游戲時(shí)，游戲畫面如圖3所示：</p><p><b>　　圖3游戲初始畫面</b><

34、;/p><p>　　我們可以清楚的看到，游戲界面主要分為兩個(gè)主要部分：1. 計(jì)數(shù)及狀態(tài)區(qū)；2.地雷區(qū)。</p><p>　　首先我利用PictureBox組件，PictureBox為容器類型的組件，因此可以加入其他組件在其內(nèi)。在游戲中我利用了PictureBox組件的兩個(gè)特性，分別為容器特性及立體框線，具體如下：</p><p>　　(1)容器特性：只要容器本身顯示的行

35、為改變，在容器內(nèi)的組件也會(huì)跟著改變。當(dāng)游戲初始時(shí)，地雷區(qū)的顯示組件會(huì)循環(huán)執(zhí)行，逐一布置在畫面上，但由于執(zhí)行循環(huán)時(shí)多個(gè)Image組件要顯示圖形，造成分時(shí)系統(tǒng)執(zhí)行頻率顯示上會(huì)出現(xiàn)不流暢的情形，若在循環(huán)執(zhí)行前，先將容器本身的Visable屬性設(shè)為False，在循環(huán)執(zhí)行完成后再將Visable屬性設(shè)為Ture，則顯示就會(huì)變得流暢許多。</p><p>　　(2)立體框線：通過組件本身立體框線的屬性設(shè)定，可以為游戲畫面的顯

36、示上營(yíng)造出層次感。</p><p>　　然后再利用ImageList組件來存儲(chǔ)游戲中將要使用的圖片，我們可以將組件布置于窗體后編輯組件屬性，如圖4所示：</p><p><b>　　圖4</b></p><p>　　通過InsertPicture和RemovePicture按鈕即可編輯組件所存放的圖片。</p><p>

37、　　利用ImageList集合對(duì)象的Picture方法，即可將ImageList組件內(nèi)的圖片指定給圖形顯示組件，語法如下：</p><p>　　Set 圖形組件. Picture=ImageList. ImageList(圖片索引). Picture</p><p>　　因?yàn)橐粋€(gè)ImageList組件內(nèi)必須存儲(chǔ)大小相同的圖片，所以在游戲中顯示的圖片共分為三個(gè)部分：1.數(shù)字計(jì)數(shù)圖形；2.游戲

38、狀態(tài)圖形；3.地雷區(qū)表示圖形。</p><p>　　所以我們使用了三個(gè)ImageList組件來存儲(chǔ)不同大小的圖片。</p><p>　　接著便是對(duì)地雷區(qū)的初始化，這里我們利用Load及UnLoad指令，動(dòng)態(tài)新增及刪除組件。在游戲的地雷區(qū)，我們依照游戲者自定義的地圖類型，來布置未探測(cè)地雷方塊。假如設(shè)定的地圖大小為20×30時(shí)，我們可以通過雙循環(huán)For…Next及Load指令在程序執(zhí)

39、行階段動(dòng)態(tài)加載表示方塊的組件，程序片段如下:</p><p>　　‘加載表示地圖資料的圖片</p><p>　　For y = 0 To 20 ‘地雷區(qū)高</p><p>　　For x = 0 To 30 ‘地雷區(qū)寬</p><p>　　Load 表示方塊組件（index）</p><p><b>

40、;　　‘設(shè)定組件位置……</b></p><p><b>　　Next x</b></p><p><b>　　Next y</b></p><p>　　經(jīng)過雙循環(huán)的運(yùn)算，程序就會(huì)產(chǎn)生20×30=600個(gè)組件，試想如果在程序設(shè)計(jì)階段，就把600個(gè)組件布置在窗體上，那將是多么沒有效率的事情，況且組件數(shù)量

41、的多少，還要取決于游戲玩家設(shè)定的地雷區(qū)大小，所以利用Load指令對(duì)于大量加載同一組件的動(dòng)作將有莫大的幫助。</p><p>　　加載組件后必須將組件做適當(dāng)?shù)牟贾茫覀兛梢酝ㄟ^Image組件的Move屬性，將組件布置于預(yù)定的位置，Move函數(shù)的原型如下：</p><p>　　組件.Move X坐標(biāo)，[Y坐標(biāo)]，[組件寬度]，[組件高度]</p><p>　　（其中括號(hào)

42、內(nèi)表示可以省略）</p><p>　　再配合雙循環(huán)的變量值，可以控制組件布置于窗體的方向及方式，例如以下程序片段：</p><p>　　For y = 0 To 20 ‘地雷區(qū)高</p><p>　　For x = 0 To 30 ‘地雷區(qū)寬</p><p>　　Load 表示方塊組件（index）</p><p

43、><b>　　‘設(shè)定組件位置……</b></p><p>　　組件（index）.Move x *組件寬度，y *組件高度</p><p><b>　　Next x</b></p><p><b>　　Next y</b></p><p>　　組件將呈現(xiàn)先由左至右，再由上

44、至下布置。</p><p>　　若將內(nèi)循環(huán)改為y值，同樣的Move指令，組件的布置方向?qū)⒂缮隙略儆勺笾劣摇２贾梅较虻牟煌?，?huì)關(guān)聯(lián)到組件內(nèi)含的索引值不同，相對(duì)在程序執(zhí)行階段存取組件時(shí)，所定義的組件索引值就必須考慮組件不止的方向，這樣才不會(huì)造成組件存取的錯(cuò)誤。以由左至右再由上而下的布置方式為例，我們可以利用以下公式，求得組件索引值：組件索引值=（X坐標(biāo)+Y坐標(biāo)*數(shù)組寬度）</p><p>　

45、　這樣，游戲界面的初始化工作就基本完成了，下面就是地雷的隨機(jī)產(chǎn)生。</p><p><b>　　3.2雷區(qū)的布置</b></p><p>　　3.3游戲中主要模塊的介紹與使用</p><p><b>　　3.3.1鼠標(biāo)事件</b></p><p>　　在游戲過程中，我們利用鼠標(biāo)所發(fā)出的信息了解游戲者

46、的意圖，進(jìn)而作出相對(duì)應(yīng)的動(dòng)作。</p><p>　　在MouseDown與MouseUp事件中，可以捕捉鼠標(biāo)所按下或放開的按鍵為何、鼠標(biāo)光標(biāo)在該組件上的坐標(biāo)及是否同時(shí)按下輔助鍵等。函數(shù)原型如下：</p><p>　　組件名稱_MouseDown(index As Integer, _Button As Integer, _Shift As Integer, _ x As Single, _

47、y As Single)</p><p>　　組件名稱_MouseUp(index As Integer, _Button As Integer, _Shift As Integer, _ x As Single, _y As Single)</p><p>　　在參數(shù)列中，Button參數(shù)值表示鼠標(biāo)上的按狃數(shù)值。其意義如下：</p><p>　　1：左鍵

48、 2：右鍵</p><p>　　倘若同時(shí)按下不止一個(gè)按鍵時(shí)，則傳回?cái)?shù)值為按鍵數(shù)值相加，例如同時(shí)按下左鍵及右鍵，則Button值為1+2=3</p><p>　　在本游戲中，我們利用右鍵的MouseDown事件來標(biāo)示“已標(biāo)示”方塊，利用左鍵的MouseDown事件，來標(biāo)示游戲者準(zhǔn)備按下的方塊，再利用左鍵的MouseUp事件來確定翻開的方塊。這樣的用意在于，假如游戲者發(fā)現(xiàn)按下的方塊是錯(cuò)誤的，此

49、時(shí)只要不松開左鍵，同時(shí)按下右鍵，該方塊就會(huì)被標(biāo)示為“已標(biāo)示”方塊，若再松開左鍵，則該方塊因?yàn)橐殉蔀椤耙褬?biāo)示”方塊，所以就無法翻開。</p><p>　　在窗口的軟件中，鼠標(biāo)的應(yīng)用是不可或缺的，但鼠標(biāo)固然好用，如果程序設(shè)計(jì)不當(dāng)，也可能造成使用者的不便。通常鼠標(biāo)在軟件的應(yīng)用上經(jīng)常使用MouseUp事件來作為確定使用者的操作意圖，而只把MouseDown事件當(dāng)做標(biāo)示的用途（用意就如同前面所提），只是為給使用者一個(gè)反悔的

50、機(jī)會(huì)。</p><p>　　游戲的操作方面主要以鼠標(biāo)為主，當(dāng)鼠標(biāo)指針對(duì)準(zhǔn)未翻開的方塊按下左鍵時(shí)即表示翻開方塊：</p><p>　　If Button = 1 Then '鼠標(biāo)左鍵</p><p>　　If mapFaceArr(xxx, yyy) = 1 Then</p><p>　　Call setMineImage(index,

51、 10)</p><p>　　Set iState.Picture = ilSmile.ListImages(3).Picture</p><p><b>　　End If</b></p><p>　　當(dāng)鼠標(biāo)指針對(duì)準(zhǔn)未翻開的方塊按下右鍵時(shí)即表示標(biāo)示或疑示地雷，反復(fù)按下右鍵則方塊會(huì)以“未標(biāo)示”→“標(biāo)示”→“疑似”三者關(guān)系不斷循環(huán)：</p&g

52、t;<p>　　If Button = 2 Then '鼠標(biāo)右鍵</p><p>　　If mapFaceArr(xxx, yyy) = 1 Then '未探測(cè)</p><p>　　mapFaceArr(xxx, yyy) = 2</p><p>　　MINE_NUM_LABEL = MINE_NUM_LABEL + 1</p&g

53、t;<p>　　Call setMineImage(index, 13)</p><p>　　Call setNowMines</p><p>　　ElseIf mapFaceArr(xxx, yyy) = 2 Then '標(biāo)示</p><p>　　mapFaceArr(xxx, yyy) = 3</p><p>　　M

54、INE_NUM_LABEL = MINE_NUM_LABEL - 1</p><p>　　Call setMineImage(index, 14)</p><p>　　Call setNowMines</p><p>　　ElseIf mapFaceArr(xxx, yyy) = 3 Then '疑似</p><p>　　mapFac

55、eArr(xxx, yyy) = 1</p><p>　　Call setMineImage(index, 9)</p><p><b>　　End If</b></p><p>　　3.3.2地雷及雷區(qū)表面探測(cè)情況</p><p>　　在游戲設(shè)計(jì)上，我利用了兩個(gè)二維數(shù)組分別記錄地雷的分布情況及雷區(qū)表面探測(cè)情形，如圖5和

56、圖6所示：</p><p>　　圖5標(biāo)示地雷分布情況</p><p>　　圖6標(biāo)示地雷探測(cè)情況</p><p>　　因?yàn)閮蓚€(gè)數(shù)組維數(shù)皆為2，所以我們通過雙循環(huán)做數(shù)據(jù)的對(duì)比工作。另外，當(dāng)游戲玩家按下非地雷的方塊時(shí)，程序必須自動(dòng)將周邊非地雷的方塊翻開，這個(gè)動(dòng)作我們也可以通過雙循環(huán)的方式檢查以按下的方塊為中心與周邊的8個(gè)方塊所形成的3*3的二維數(shù)組，鼠標(biāo)指針?biāo)讣词谴戆?/p>

57、下的方塊，利用雙循環(huán)作數(shù)據(jù)的對(duì)比，不但速度快，而且在設(shè)計(jì)階段，程序的架構(gòu)也比較清楚。程序設(shè)計(jì)時(shí)雙循環(huán)常常搭配二維數(shù)組使用。</p><p>　　3.3.3清除未靠近地雷的方塊</p><p>　　這里先引入一個(gè)“遞歸”的概念，“遞歸”(Recursion)簡(jiǎn)單的說，就是一個(gè)程序能被自己所定義的語句調(diào)用。遞歸在程序設(shè)計(jì)上是一種重要的數(shù)據(jù)結(jié)構(gòu)形態(tài)，通過遞歸程序的編寫，在程序代碼上會(huì)變得相當(dāng)簡(jiǎn)潔

58、，不過如果設(shè)計(jì)不當(dāng)，會(huì)造成無窮循環(huán)或堆迭溢滿的情形，所以遞歸的程序中心必須含有if…then或Select Case等設(shè)計(jì)，以終止遞歸執(zhí)行。</p><p>　　在游戲過程中，當(dāng)游戲者按下非地雷方塊時(shí)，方塊會(huì)沿四周八個(gè)方向向外翻開非地雷的方塊。</p><p>　　程序的執(zhí)行方面必須判斷：以按下方塊為中心，檢查周圍八個(gè)方塊是否為非地雷方塊，若其中有一個(gè)方塊是非地雷方塊時(shí)，則又以其為中心，向

59、外檢查周圍八個(gè)方塊是否為非地雷方塊，如此反復(fù)的執(zhí)行即構(gòu)成遞歸的使用條件。</p><p>　　前面已經(jīng)提到，遞歸必須設(shè)計(jì)終止的條件判斷，在本游戲的遞歸架構(gòu)中，當(dāng)判斷方塊的內(nèi)容為數(shù)字時(shí)（即在非地雷方塊周圍），即立即停止遞歸程序。</p><p>　　遞歸其實(shí)也不是萬能的，以本游戲做測(cè)試，當(dāng)?shù)乩讌^(qū)范圍越大，且地雷數(shù)目不多時(shí)（一翻開非地雷方塊，幾乎全部方塊都會(huì)翻開），執(zhí)行遞歸就會(huì)變的非常緩慢，甚

60、至造成堆迭溢滿（不足）的情形，所以在游戲設(shè)計(jì)上必須考慮地雷區(qū)的大小，以免造成執(zhí)行時(shí)錯(cuò)誤中斷的情況發(fā)生。</p><p><b>　　代碼部分如下所示：</b></p><p>　　Private Sub doClear(ByVal x As Integer, _</p><p>　　ByVal y As Integer, _</p>

61、<p>　　ByVal index As Integer)</p><p>　　MINE_NUM_CLEAR = MINE_NUM_CLEAR + 1</p><p>　　For xx = x - 1 To x + 1</p><p>　　For yy = y - 1 To y + 1</p><p>　　If xx >=

62、 0 And xx <= MAP_X And _</p><p>　　yy >= 0 And yy <= MAP_Y Then</p><p>　　If Not (xx = x And yy = y) Then</p><p>　　If mapFaceArr(xx, yy) = 1 And _</p><p>　　mapAr

63、r(xx, yy) >= 0 And _</p><p>　　mapArr(xx, yy) <= 8 Then</p><p>　　mapFaceArr(xx, yy) = 0</p><p>　　Select Case mapArr(xx, yy)</p><p><b>　　Case 0</b></

64、p><p>　　Call setMineImage((yy * MAP_X + xx), 10)</p><p>　　Call doClear(xx, yy, (yy * MAP_X + xx))</p><p>　　Case 1 To 8</p><p>　　MINE_NUM_CLEAR = MINE_NUM_CLEAR + 1</p&g

65、t;<p>　　Call setMineImage((yy * MAP_X + xx), mapArr(xx, yy))</p><p>　　End Select</p><p><b>　　End If</b></p><p><b>　　End If</b></p><p><

66、;b>　　End If</b></p><p><b>　　Next yy</b></p><p><b>　　Next xx</b></p><p><b>　　End Sub</b></p><p>　　3.3.4游戲難度的選擇</p>&l

67、t;p>　　這里我設(shè)置了“初級(jí)”，“中級(jí)”，“高級(jí)”以及“自定義”四個(gè)不同的難度級(jí)別，“初級(jí)”，“中級(jí)”，“高級(jí)”中的雷區(qū)大小和地雷總數(shù)是已經(jīng)設(shè)計(jì)好了的，如果玩家想要自己設(shè)置這些參數(shù)，可單擊“游戲”→“自定義”，然后在“設(shè)置”中輸入行數(shù)，列數(shù)及地雷數(shù)，在這里我對(duì)行數(shù)及列數(shù)做出了一個(gè)限定，及行數(shù)和列數(shù)的最大值分別為24和30，當(dāng)在設(shè)置地雷數(shù)的時(shí)候，如果地雷數(shù)大于或等于行數(shù)和列數(shù)的乘積，或者地雷數(shù)小于零，地雷數(shù)都將自動(dòng)的轉(zhuǎn)換為：地雷數(shù)

68、=（行數(shù)-1）×（列數(shù)-1）。</p><p><b>　　3.4游戲的判斷</b></p><p>　　3.4.1游戲成功完成</p><p>　　當(dāng)在規(guī)定的時(shí)間內(nèi)將所有的雷都正確的標(biāo)示出來，游戲就會(huì)有一個(gè)彈出框提示你在多長(zhǎng)時(shí)間內(nèi)完成當(dāng)前難度下的游戲。</p><p>　　還有一種情況便是當(dāng)只剩下地雷未探測(cè)的

69、時(shí)候，及雷區(qū)方塊總數(shù)-已清除的方塊數(shù)=地雷總數(shù)的話，游戲也將成功完成。</p><p><b>　　3.4.2游戲失敗</b></p><p>　　當(dāng)鼠標(biāo)左鍵按下的方塊為地雷方塊事，地雷將會(huì)被引爆，游戲立即結(jié)束。</p><p>　　當(dāng)在設(shè)定時(shí)間內(nèi)未探測(cè)完所有的地雷，地雷也將會(huì)引爆，對(duì)于這第二種行為，我們可以通過Timer組件來加以控制。利用T

70、imer組件在固定時(shí)間即會(huì)觸發(fā)時(shí)間的特性，在事件觸發(fā)時(shí)便將計(jì)數(shù)值加一，直到判斷計(jì)數(shù)值超過限定值時(shí)，即地雷引爆。具體代碼如下所示：</p><p><b>　　'定時(shí)器</b></p><p>　　Private Sub Timer1_Timer()</p><p>　　TIME_COUNTER = TIME_COUNTER + 1<

71、;/p><p><b>　　'時(shí)間計(jì)數(shù)顯示</b></p><p>　　Call setNowTimer</p><p><b>　　'設(shè)定狀態(tài)圖示</b></p><p>　　If TIME_COUNTER = 999 Then</p><p>　　isDie

72、= True</p><p>　　Timer1.Enabled = False</p><p>　　mapFaceArr(xxx, yyy) = 0</p><p>　　Call showMine</p><p><b>　　'設(shè)定狀態(tài)圖示</b></p><p>　　Call setSt

73、ateImage</p><p>　　MsgBox "您探測(cè)地雷的時(shí)間已超過，地雷已引爆。", , "超時(shí)"</p><p><b>　　End If</b></p><p><b>　　End Sub</b></p><p><b>　　游戲測(cè)試結(jié)

74、果</b></p><p>　　在程序代碼基本完成后，經(jīng)過不斷的調(diào)試與修改，最后測(cè)試本次所設(shè)計(jì)的掃雷游戲能夠正常運(yùn)行，在基本功能與畫面上與Windows自帶的掃雷游戲沒有太大差別，沒有出現(xiàn)明顯的錯(cuò)誤和漏洞，但是在一些細(xì)節(jié)方面仍然需要完善，比如在游戲中可以加入一些聲音的提示，在游戲完成和失敗的時(shí)候可以彈出一些小的Flash動(dòng)畫，還有就是可以加入一個(gè)掃雷英雄榜等等。總的來說本次設(shè)計(jì)在功能上已經(jīng)基本達(dá)到要求

75、，其他細(xì)節(jié)方面有待以后完善。</p><p><b>　　結(jié) 論</b></p><p>　　畢業(yè)設(shè)計(jì)是本科學(xué)習(xí)階段一次非常難得的理論與實(shí)際相結(jié)合的機(jī)會(huì)，通過這次比較完整的一個(gè)程序的設(shè)計(jì)，我擺脫了單純的理論知識(shí)學(xué)習(xí)狀態(tài)，和實(shí)際設(shè)計(jì)的結(jié)合鍛煉了我的綜合運(yùn)用所學(xué)的專業(yè)基礎(chǔ)知識(shí)，解決實(shí)際問題的能力，同時(shí)也提高我查閱文獻(xiàn)資料、對(duì)程序整體的把握等其他能力水平，而且通過對(duì)整

76、體的掌控，對(duì)局部的取舍，以及對(duì)細(xì)節(jié)的斟酌處理，都使我的能力得到了鍛煉，經(jīng)驗(yàn)得到了豐富。這是我們都希望看到的也正是我們進(jìn)行畢業(yè)設(shè)計(jì)的目的所在。</p><p>　　雖然畢業(yè)設(shè)計(jì)內(nèi)容繁多，過程繁瑣但我的收獲卻更加豐富。各種組件的運(yùn)用，各種算法的應(yīng)用，各種控件的利用我都是隨著設(shè)計(jì)的不斷深入而不斷熟悉并逐步掌握的。和老師以及同學(xué)的溝通交流更使我對(duì)程序整體的規(guī)劃與設(shè)計(jì)有了新的認(rèn)識(shí)也對(duì)自己提出了新的要求。</p>

77、<p>　　提高是有限的但提高也是全面的，正是這一次設(shè)計(jì)讓我積累了許多實(shí)際經(jīng)驗(yàn)，也必然會(huì)讓我在未來的工作學(xué)習(xí)中表現(xiàn)出更高的應(yīng)變能力和理解力。</p><p>　　順利如期的完成本次畢業(yè)設(shè)計(jì)給了我很大的信心，但是也讓我看到了自己許多不足的地方，學(xué)習(xí)其實(shí)就是一個(gè)不斷完善的過程，正視自己的不足之處，在以后的工作和學(xué)習(xí)中不斷的彌補(bǔ)這些不足之處，在以后的生活中也要保持同樣的態(tài)度，不斷的完善自己。</p&

78、gt;<p><b>　　參考文獻(xiàn)</b></p><p>　　[1] 唐任仲.工程應(yīng)用軟件開發(fā)技術(shù)[M].北京：化學(xué)工業(yè)出版社，1999。</p><p>　　[2] 李懷明.Visual Basic 6.0 中文版 參考詳解[M].北京：清華大學(xué)出版社，1999。</p><p>　　[3] 李善茂.Visual Basic

79、6.0 高級(jí)編程技巧[M].西安：電子工業(yè)出版社，1999。</p><p>　　[4] 譚浩強(qiáng).Visual Basic 6.0 中文版 提高與應(yīng)用[M].西安：電子工業(yè)出版社，1999。</p><p>　　[5] 馮鋒,王運(yùn)堅(jiān).Visual Basic 程序設(shè)計(jì)基礎(chǔ)教程[M].西安：電子工業(yè)出版社，1999。</p><p>　　[6] 何斌,劉醒.Visua