多重窗體與多重文檔界面

多重窗體與多重文檔界面第1頁，共16頁，2023年，2月20日，星期一菜單列表框一、菜單編輯器的使用工具／菜單編輯器(CTRL+E)

窗體上快顯菜單／菜單編輯器菜單項(xiàng)屬性常用屬性：1.標(biāo)題(Caption)熱鍵：前面加&2.名稱(Name)文本框分隔符也應(yīng)有名稱。3.快捷鍵(Shortcut)菜單名沒有快捷鍵4.復(fù)選(Checked)檢查框TRUE有5.有效(Enabled)檢查框 6.可見(Visible)檢查框操作按鈕第2頁，共16頁，2023年，2月20日，星期一二、菜單項(xiàng)增減

在程序運(yùn)行時(shí)，菜單隨時(shí)增減，如“文件”菜單能保留最近打開的文件數(shù)。這同控件數(shù)組一樣，使用菜單數(shù)組。步驟：

1.在菜單設(shè)計(jì)時(shí)，加入一個(gè)菜單項(xiàng)，其Index為0（菜單數(shù)組）,Visual為False。

2.在程序運(yùn)行時(shí)，通過Load方法向菜單數(shù)組增加新的菜單項(xiàng)。同樣，要?jiǎng)h除所建立的菜單項(xiàng)，使用UnLoad方法向菜單數(shù)組減少菜單項(xiàng)。第3頁，共16頁，2023年，2月20日，星期一三、彈出菜單(快捷菜單)

顯示在窗體的浮動(dòng)菜單，操作時(shí)使用右鍵，菜單與鼠標(biāo)位置有關(guān)。設(shè)計(jì)與普通菜單，僅該菜單名不可顯示；要顯示時(shí)使用PopupMenu方法彈出菜單。形式：[對象.]PopupMenu菜單名,標(biāo)志,x,y

標(biāo)志，表示彈出的位置和觸發(fā)的鍵位置 性能

0：X位置確定彈出菜單的左邊界 0只能用鼠標(biāo)左鍵觸發(fā)彈出菜單；

4：彈出菜單以X為中心 2：能用鼠標(biāo)左、右鍵鍵觸發(fā)彈出菜單；

8：X位置確定彈出菜單的右邊界位置與性能是加的關(guān)系。

SubText1_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)IfButton=2ThenPopupMenuEditMenu,vbPopupMenuCenterAlignEndSub第4頁，共16頁，2023年，2月20日，星期一9.2多重窗體應(yīng)用程序根據(jù)所解決問題的不同，需要建立多個(gè)窗體作為信息載體。

Windows環(huán)境的應(yīng)用程序至少需要一個(gè)窗體。多窗體可以是并列的，并有且僅有一個(gè)窗體是啟動(dòng)窗體。多窗體也可以是層次結(jié)構(gòu)的，即一個(gè)MDI窗體（父窗體）和多個(gè)子窗體。第5頁，共16頁，2023年，2月20日，星期一1.添加窗體

“工程或工具欄|添加窗體”新建現(xiàn)存

添加“現(xiàn)存”窗體時(shí)要注意：防止多個(gè)窗體的Name相同而不能添加；添加的窗體實(shí)際是將其他工程中已有的窗體加入，多個(gè)工程共享窗體；通過“另存為”命令以不同的窗體文件名保存，斷開共享。

2.保存窗體

一個(gè)工程中有多個(gè)窗體，應(yīng)分別取不同文件名保存在磁盤上，VBP工程文件中記錄了該工程的所有窗體文件名。

第6頁，共16頁，2023年，2月20日，星期一3.設(shè)置啟動(dòng)窗體設(shè)置啟動(dòng)對象5.窗體方法

(1)Load語句：裝入窗體到內(nèi)存但沒有顯示窗體 形式：Load窗體名稱

(2)Unload語句：從內(nèi)存刪除窗體形式：Unload窗體名稱“工程/屬性”“啟動(dòng)對象”4.刪除窗體先在工程資源管理器窗口中選定要?jiǎng)h除窗體,然后通過工程菜單的“移除窗體”命令或右擊工程管理窗口的窗體名,在快捷菜單中選取“移除窗體”第7頁，共16頁，2023年，2月20日，星期一(3)Show方法：顯示一個(gè)窗體（當(dāng)窗體沒有Load，自動(dòng)Load）

[窗體名稱].Show[模式] 0－無模式：可以對其他窗體進(jìn)行操作，

1－有模式：關(guān)閉才能對其他窗體進(jìn)行操作。

(4)Hide方法：隱藏窗體，沒有Unload-刪除

[窗體名稱.]Hide6.不同窗體間數(shù)據(jù)的存取

(1)存取控件的屬性

另一窗體名.控件名.屬性

(2)存取變量的值 另一窗體名.全局變量名第8頁，共16頁，2023年，2月20日，星期一

例

輸入和計(jì)算學(xué)習(xí)成績。模塊：PublicMATHAsSinglePublicPHYSICSAsSinglePublicCHEMISTRYAsSinglePublicCHINESEAsSinglePublicENGLISHAsSingle第9頁，共16頁，2023年，2月20日，星期一模塊是程序中相結(jié)獨(dú)立的程序單元,VB中主要有三種不同的模塊：標(biāo)準(zhǔn)模塊、窗體模塊和類模塊。一、標(biāo)準(zhǔn)模塊

1、組成和作用由全局變量聲明、模塊變量聲明和通用過程等組成，用于定義全局或模塊級的變量或過程。

2、建立標(biāo)準(zhǔn)模塊執(zhí)行菜單：工程→添加模塊二、窗體模塊

1、組成和作用由一個(gè)或多個(gè)窗體組成，實(shí)現(xiàn)界面設(shè)計(jì)，完成變量或常量的聲明、通用或事件驅(qū)動(dòng)子過程的定義。9.3模塊第10頁，共16頁，2023年，2月20日，星期一

2、建立窗體執(zhí)行菜單：工程→添加窗體

3、調(diào)用窗體過程

[窗體名.]過程名（[參數(shù)列表]）三、SubMain過程一般程序的運(yùn)行是從某指定的窗體文件開始執(zhí)行的，但有時(shí)需要在窗體被顯示前，先完成一些初始化工作，為完成這一工作可在顯示窗體之前應(yīng)先執(zhí)行沒有主界面的“SubMain()”過程，這就需要設(shè)計(jì)這樣一個(gè)“通過子過程”，并通過菜單：工程→工程屬性，打開工程屬性對話框，并將“SubMain()”過程設(shè)為“啟動(dòng)對象”即可。第11頁，共16頁，2023年，2月20日，星期一9.3多重文檔界面多文檔界面設(shè)計(jì)是由一個(gè)MDI窗體和至少一個(gè)子窗體組成的。其特點(diǎn)是：1.MDI窗體只能有且僅有一個(gè)。2.子窗體至少一個(gè)。3.用戶可以改變并移動(dòng)子窗體的大小，但被限制在MDI窗體內(nèi)。4.子窗體最小化后顯示在MDI窗體左下角5.MDI窗體最小化時(shí)，在任務(wù)欄顯示，所有子窗體相應(yīng)最小化，但不在任務(wù)欄顯示。6.還原MDI窗體時(shí)其子窗體同時(shí)按最小化前的狀態(tài)顯示。7.通過子窗體的AutoShowChildren屬性，在程序加載時(shí)自動(dòng)顯示或隱藏該窗體8.MDI和子窗體可各有自己的菜單，但當(dāng)子窗體的加載時(shí)覆蓋MDI窗體的菜單。第12頁，共16頁，2023年，2月20日，星期一多文檔界面(MDI)1.創(chuàng)建和設(shè)計(jì)MDI窗體及其子窗體(1)創(chuàng)建和設(shè)計(jì)MDI窗體創(chuàng)建：“工程/添加MDI窗體”命令設(shè)計(jì)：一般有菜單欄、工具欄、狀態(tài)欄第13頁，共16頁，2023年，2月20日，星期一(2)創(chuàng)建和設(shè)計(jì)MDI子窗體創(chuàng)建：MDI子窗體是一個(gè)MDIChild屬性為True的普通窗體。要?jiǎng)?chuàng)建多個(gè)子窗體，通過窗體類來實(shí)現(xiàn)：

PublicSubFileNewProc()DimNewDocAsNewfrmMDIChildNo=No+1NewDoc.Caption="no"&NoNewDoc.Show EndSub

設(shè)計(jì)：可有菜單欄，但必須有文本框。

MDI子窗體的Name第14頁，共16頁，2023年，2月20日，星期一2.MDI窗體與子窗體的交互(1)活動(dòng)子窗體和活動(dòng)控件

MDI窗體的兩個(gè)屬性：ActiveForm和ActiveControl

例將子窗體的文本框中所選文本復(fù)制到剪貼板上：

ClipBoard.SetTextfrmMDI.ActiveForm.ActiveControl.SelText(2)顯示MDI窗體及其子窗體

顯示任何窗體的方法為show,還有有關(guān)規(guī)則：（1）加載子窗體時(shí)，其父窗體會(huì)自動(dòng)加載并顯示；反之則無。（2）MDI窗體有AutoShowChildren屬性，決定是否自動(dòng)顯示子窗體第15頁，共16頁，2023年，2月20日，星期一3.多文檔界面應(yīng)用程序中的“窗口