《菜單程序設(shè)計(jì)》word版

《《菜單程序設(shè)計(jì)》word版》由會(huì)員上傳分享，免費(fèi)在線閱讀，更多相關(guān)內(nèi)容在應(yīng)用文檔-天天文庫(kù)。

1、菜單程序設(shè)計(jì)菜單程序設(shè)計(jì)2010年12月05日星期日下午09：52菜單程序設(shè)計(jì)一、菜單菜單的基本作用：菜單的基本類型：幾個(gè)常用術(shù)語(yǔ)：--菜單條出現(xiàn)在窗體標(biāo)題的下面，包含每個(gè)菜單的標(biāo)題。--菜單包含命令列表或子菜單名。--菜單中列出的每一項(xiàng)。--從某個(gè)菜單項(xiàng)分支出來(lái)的另外的一個(gè)菜單。具有子菜單的菜單項(xiàng)右邊帶有一個(gè)三角符號(hào)標(biāo)志。--分隔條是在菜單項(xiàng)之間的一條水平直線，用于修飾菜單。--彈出式菜單是另一種形式的菜單，在按下鼠標(biāo)右鍵時(shí)出現(xiàn)，它是一個(gè)上下文相關(guān)的菜單。使用菜單編輯器可以為應(yīng)用程序創(chuàng)建自定義菜單并定義其屬性，利用這個(gè)編

2、輯器，可以建立下拉式菜單，最多可達(dá)6層。啟動(dòng)菜單編輯器的方法有4種(先選中一個(gè)窗體，使之為活動(dòng)窗體)：使用菜單"工具"/"菜單編輯器"；啟動(dòng)后，彈出菜單設(shè)計(jì)窗口。菜單編輯器窗口分為三個(gè)部分：數(shù)據(jù)區(qū)、編輯區(qū)和菜單項(xiàng)顯示區(qū)。1、數(shù)據(jù)區(qū)用來(lái)輸入或修改菜單項(xiàng)、設(shè)置屬性。其中：隔線?？稍谠撐谋究蛑休斎霐?shù)值，這個(gè)值用來(lái)在幫助文件(用HelpFile屬性設(shè)置)中查找相應(yīng)的幫助主題。用來(lái)確定菜單或菜單項(xiàng)是否出現(xiàn)或在什么位置出現(xiàn)。該列表有4個(gè)選項(xiàng)：0-None菜單項(xiàng)不顯示2、編輯區(qū)共有7個(gè)按鈕。3、菜單項(xiàng)顯示區(qū)(菜單列表)位于菜單設(shè)計(jì)窗口的

3、下部，輸入的菜單項(xiàng)在這里顯示出來(lái)，并通過(guò)內(nèi)縮符號(hào)(…)表明菜單項(xiàng)的層次。條形光標(biāo)所在的菜單項(xiàng)是"當(dāng)前菜單項(xiàng)"。說(shuō)明：菜單項(xiàng)是一個(gè)總的名稱，包括4個(gè)方面的內(nèi)容：菜單名(菜單標(biāo)題)、菜單命令、分隔線和子菜單。內(nèi)縮符號(hào)由4個(gè)點(diǎn)組成，它表明菜單項(xiàng)所在的層次，一個(gè)內(nèi)縮符號(hào)(4個(gè)點(diǎn))表示一層，兩個(gè)內(nèi)縮符號(hào)(8個(gè)點(diǎn))表示兩層…最多20個(gè)點(diǎn)，即5個(gè)內(nèi)縮符號(hào)，它后面的菜單項(xiàng)為第六層。如果一個(gè)菜單項(xiàng)前面沒有內(nèi)縮符號(hào)，則該菜單為菜單名，即菜單的第一層。隔線。下面通過(guò)一個(gè)簡(jiǎn)單的例子說(shuō)明菜單程序設(shè)計(jì)的基本方法和步驟。例1根據(jù)題意，可以將菜單分為3個(gè)

4、主菜單項(xiàng)，分別為"計(jì)算加、減"、"計(jì)算乘、除"和"清除與退出"，它們各有兩個(gè)子菜單，即："計(jì)算加、減"的子菜單項(xiàng)：加、減"計(jì)算乘、除"的子菜單項(xiàng)：乘、除"清除與退出"的子菜單項(xiàng)：清除、退出另外，為了輸入和顯示，再建立兩個(gè)文本框(輸入數(shù)據(jù))和四個(gè)標(biāo)簽。1、界面：其中Lable4的BorderStyle屬性設(shè)置為1。2、菜單項(xiàng)屬性：3、設(shè)計(jì)菜單：步驟：其它兩個(gè)主菜單的建立與前面步驟類似，不再重復(fù)。設(shè)計(jì)完成后的窗口如下圖。"確定"后結(jié)束。設(shè)計(jì)完成后，窗體頂行顯示主菜單項(xiàng)，單擊某個(gè)主菜單項(xiàng)，即可下拉顯示其子菜單。4、程序代碼：每個(gè)

5、菜單項(xiàng)都可以接收Click事件。每個(gè)菜單項(xiàng)都有一個(gè)名字(Name屬性)，將這個(gè)名字與Click放在一起，組成Click事件過(guò)程。OptionExplicitPrivateSubAdd_Click()x=Val(Text1.Text)+Val(Text2.Text)EndSubPrivateSubMin_Click()x=Val(Text1.Text)-Val(Text2.Text)PrivateSubMul_Click()x=Val(Text1.Text)*Val(Text2.Text)PrivateSubDiv_Clic

6、k()IfText2.Text="0"OrText2.Text=""ThenEndSubPrivateSubClean_Click()Text1.Text=""EndSubPrivateSubQuit_Click()5、運(yùn)行程序：在兩個(gè)文本框中輸入數(shù)字后，分別單擊各菜單項(xiàng)或熱鍵，看一看執(zhí)行結(jié)果。本例中的"有效"屬性和"可見"屬性采用默認(rèn)的"True"，只有在必要時(shí)才設(shè)置其它屬性。下面將討論這些情況。在使用Windows或VB菜單時(shí)，已見過(guò)"與眾不同"的菜單項(xiàng)，如有的呈灰色，單擊這類菜單項(xiàng)不執(zhí)行任何操作；有的菜單項(xiàng)前有"√"

7、號(hào)，或菜單項(xiàng)的某個(gè)字母下面有下劃線等等。下面將介紹如何在菜單中增加這些屬性。1、菜單項(xiàng)的有效屬性(有效性控制)為了使程序正常運(yùn)行，有時(shí)需要使某些菜單項(xiàng)失效，以防止出現(xiàn)誤操作。例如前面的例子中，只有在文本框中輸入數(shù)字后才能進(jìn)行運(yùn)算，否則運(yùn)算沒有意義。因此，如果尚未輸入數(shù)據(jù)，則應(yīng)使執(zhí)行加、減、乘、除的菜單項(xiàng)失效，在輸入數(shù)據(jù)后才生效。為此，可增加下面兩個(gè)事件過(guò)程：PrivateSubText1_Change()IfText1.Text=""ThenEndSubPrivateSubText2_Change()IfText2.Tex

8、t=""ThenEndSub除增加上述兩個(gè)事件過(guò)程外，還要方法：打開"菜單編輯器"窗口，把對(duì)應(yīng)于這4個(gè)菜單項(xiàng)的數(shù)據(jù)區(qū)中的"有效"屬性復(fù)選框中的"√"去掉即可。2、菜單項(xiàng)的復(fù)選屬性(菜單項(xiàng)的標(biāo)記)所謂菜單項(xiàng)標(biāo)記，就是在菜單項(xiàng)前加上一個(gè)"√"。它有兩個(gè)作用：增加方法：一般來(lái)說(shuō)，菜單項(xiàng)標(biāo)記通常是動(dòng)態(tài)的加上或取