【正文】 件。 – （ 1） 單窗體：一個(gè)應(yīng)用程序中只包含一個(gè)窗體 。然后在計(jì)算器應(yīng)用程序的 “幫助－關(guān)于 …” 子菜單的 Click事件中加入以下代碼： 1 ?在 Show命令后加參數(shù) 1， 表示以模態(tài)方式顯示 frmAbout窗體。當(dāng) “加”時(shí) MyResult = Val() + Val() Case 減 39。 = End Sub TxtSecond文本框的 Change事件代碼同上。 ? – 你將系統(tǒng)地掌握 VB編程的一般方法及相關(guān)知識。如果 txtLabel為空，則說明現(xiàn)在正在輸入的是第 1個(gè)數(shù)字； 39。定義一個(gè) Double類型的變量。將計(jì)算結(jié)果顯示 = 39。 可視化界面設(shè)計(jì)概述 ?VB可視化程序設(shè)計(jì)包括兩部分內(nèi)容： – 一是進(jìn)行用戶界面的設(shè)計(jì)； – 二是編寫程序代碼。 – （ 4） 盡可能以清晰簡明的方式設(shè)計(jì)窗體 。 – （ 2） 在彈出的 “ 添加 MDI窗體 ” 對話框中雙擊 “ MDI”窗體圖標(biāo) 。 ? 3． MDI子窗體的顯示方法 – VB提供了兩種同時(shí)顯示多個(gè) MDI子窗體的方法：靜態(tài)顯示方法和動(dòng)態(tài)顯示方法。 – 可以通過 Windows的 API函數(shù) SetWindowPos來實(shí)現(xiàn)這一功能 ?3． ToolWindow窗體 – VB集成環(huán)境中的“工具箱”窗口就是一種典型的ToolWindow窗體 – 最簡單的方法則是將窗體的 BorderStyle屬性設(shè)置為 3或 4。 – 快捷鍵 ：快捷鍵將顯示在菜單項(xiàng)標(biāo)題的右邊，可以大大提高選擇菜單命令的速度，可通過“菜單編輯器”進(jìn)行設(shè)置。 ? 2） 在 Form1的 MouseDown事件中添加以下代碼 ， 則當(dāng)用戶在窗體上點(diǎn)擊鼠標(biāo)右鍵時(shí) ， 彈出快捷菜單 ， 如下圖所示 。 組合框控件（ ComboBox） –可以將組合框控件理解為文本框和列表框控件的功能結(jié)合體 鼠標(biāo)點(diǎn)擊此處后 出現(xiàn)下拉列表 工具欄、狀態(tài)欄和圖標(biāo)列表控件 – 相信熟悉 Windows操作的同學(xué)對工具欄（ ToolBar）和狀態(tài)欄（ StatusBar）的概念一定不會陌生 – 這兩項(xiàng)東西屬于界面設(shè)計(jì)的高級控件，并非用戶界面所必須的，但它們卻可以使用我們的界面更友好、更快捷。設(shè)置對話框的標(biāo)題 = 打開文件 39。顯示“另存為”對話框 39。聲明一個(gè)整型變量 Dim MyString As String 39。聲明控件變量 ? Set MyObject = 39。即在窗體或模塊中的所有過程中，都可以共同使用這些變量，當(dāng)離開了這個(gè)模塊或窗體，此變量就不起作用了。 ? （ 2） 取負(fù)： 。 ? （ 6） Str(x)將數(shù)值型數(shù)據(jù) x轉(zhuǎn)化為字符串 。類似的還有 Month、 Day、 WeekDay等。 返回 Wednesday, Jan 27 1993。 – MyStr = Format(HELLO, ) 39。 。 ? 5．排序程序。 一 、 創(chuàng)建一個(gè)簡單計(jì)算器應(yīng)用程序 界面 P52圖 ， 創(chuàng)建工程 窗體 Form1， 屬性Caption設(shè)置為計(jì)算器； 4個(gè)文本框 （ TextBox） : TextResult(顯示結(jié)果文本框 ) TextFirst(顯示第一個(gè)數(shù)字文本框 ) TextLabel(顯示運(yùn)行符文本框 ) TextSecond(顯示第二個(gè)數(shù)字文本框 )；二個(gè)框架（Fram）屬性 Caption分別為 數(shù)字區(qū)、功能區(qū) ；在數(shù)字區(qū)內(nèi)建 11個(gè)命令按鈕，屬性 Caption分別為 0、 +/ ；在功能區(qū)內(nèi)建 6個(gè)命令按鈕屬性 Caption分別為 加、減、乘、除、計(jì)算結(jié)果、清空 ；最后一個(gè)命令按鈕屬性Caption為 退出 ；設(shè)計(jì)菜單（圖 ）。 聲明分為：顯示聲明和隱性聲明 。 本章結(jié)束 ？ 。 隱性聲明是由 VB自動(dòng)將變量聲明為變體形 。 窗體是應(yīng)用程序的對外接口 ， 是其他控件的載體和容器 ， 窗體設(shè)計(jì)通常可分為： 單窗體 （ 一個(gè)應(yīng)用程序中只包含一個(gè)窗體 ） 設(shè)計(jì)；多窗體 （ 一個(gè)應(yīng)用程序中包含多個(gè)窗體 ） 設(shè)計(jì)；MDI窗體 （ 多文檔窗體 ， 由一個(gè)父窗體和眾多子窗體組成 ） 設(shè)計(jì) 。程序的基本邏輯是： – （ 1）在文本框 Text1中輸入一個(gè)數(shù)字，然后點(diǎn)擊“添加”按鈕，使用列表框控件的 AddItem方法，將該數(shù)字添加到列表框控件List1中。在窗體上添加兩個(gè)文本框控件，在第一個(gè)文本框中輸入數(shù)字，第二個(gè)文本框自動(dòng)顯示該數(shù)字的十六進(jìn)制數(shù)。 – MyStr = Format(This is it, ) 39。 00”) ‘ 返回 “ 5,” 。 MyStr = Format(Time, Long Time) – 39。 – （ 7） Val(x)將數(shù)字字符串轉(zhuǎn)化為數(shù)值型數(shù)據(jù) 。 – 它們的優(yōu)先級相同，按自左向右順序運(yùn)算，即用于對字符串或數(shù)值型數(shù)據(jù)的比較分析 3．邏輯運(yùn)算符 ? VB提供了以下 6個(gè)邏輯運(yùn)算符 ， 按優(yōu)先順序排列如下 ： ? （ 1） 邏輯非： Not ? （ 2） 邏輯與 And ? （ 3） 邏輯或 or ? （ 4） 邏輯異或： Xor ? （ 5） 等價(jià)： Eqv ? （ 6） 蘊(yùn)含： Imp 4．字符串連接符 –主要有 +和 amp。如果說變量的作用域是從空間角度來看待變量的，那么生命周期則是從變量存在的時(shí)間上來理解的。改變對象變量的標(biāo)題 ? Set MyObject = ? = 確定 ? End Sub 變量初始值 – 數(shù)值型變量的初始值為 0 – 字符串變量初始值為空字符串，即“”，變體型變量初始值為空值，即 Null值 – 布爾型的初值為假，即 False。聲明一個(gè)長度固定的字符型變量 Dim MyBoolean As Boolean 39。顯示“顏色”對話框 39。設(shè)置默認(rèn)文件類型（ 2表示文本文件 *.txt） = 2 39。 1．添加控件的方法 2．使用實(shí)例 工具欄 提示文本 狀態(tài)欄 代碼 ?Private Sub Toolbar1_ButtonClick(ByVal Button As ) ? 39。如果點(diǎn)擊的是鼠標(biāo)右鍵 ， 則彈出 mnuFile菜單 ? If Button = 2 Then ? PopupMenu mnuFile ? End If ? End Sub 框架、單選鈕和復(fù)選框控件 ? 1．框架（ Frame）控件 ? 2．單選鈕（ OptionButton）和復(fù)選框（ CheckBox）控件 基本用法 復(fù)選框：選中狀態(tài) Frame框架 單選鈕：選中狀態(tài) 列表框控件（ ListBox） 文本框 列表框 ? 1． List屬性 – (0)= 計(jì)算應(yīng)用專業(yè) –(1)= “軟件開發(fā)專業(yè)” –可以用 AddItem方法添加 ? 2． ListIndex屬性 – 主要用來設(shè)置或返回控件中當(dāng)前選定項(xiàng)目的索引 –如果選定第一個(gè)項(xiàng)目，則屬性值為 0，第二個(gè)為 1，依此類推。 – 利用窗體的 PopupMenu方法顯示彈出式菜單。 組合框 框架 復(fù)選框 單選鈕 列表框 圖標(biāo)列表 工具欄 狀態(tài)欄 TabStrip 通用對話框 菜單設(shè)計(jì) ? 1．菜單的基本屬性和事件 – 菜單的主要標(biāo)題（ Caption）、名稱（ Name）、索引（ Index）、有效（ Enabled）、可見（ Visible）、復(fù)選（ Check）和快捷鍵（ ShortCut）等屬性 – 菜單控件中只包含一個(gè)事件，即 Click事件 菜單的基本組成 分隔條 訪問鍵 快捷鍵 ? 2．下拉菜單的基本創(chuàng)建方法 – 新建一個(gè)窗體 ， 利用菜單編輯器設(shè)計(jì)各菜單項(xiàng) 。 –假設(shè)程序中允許用戶在 MDI父窗體上最多同時(shí)打開 3個(gè)窗體，那么設(shè)計(jì)時(shí)只要添加 3個(gè)子窗體，在 MDI父窗體中通過 Show命令顯示。 ? MDI 父窗體有兩個(gè)非常重要的屬性ActiveForm和 ActiveControl， 其中： – ActiveForm屬性：返回具有焦點(diǎn)或最后被激活的子窗體 。 – （ 6）界面元素應(yīng)盡可能一致性。窗體就是應(yīng)用程序的對外接口，是其他控件的載體和容器。 End Sub 7．“清空”命令按鈕的 Click事件 如果四則運(yùn)算完成，希望繼續(xù)進(jìn)行另一個(gè)表達(dá)式的四則運(yùn)算 工作，則點(diǎn)擊此按鈕，完成以下工作： = = = 8．“幫助”菜單的調(diào)用 事先通過 VB集成開發(fā)環(huán)境“工程－添加窗體”菜單， 使用“關(guān)于”對話框模板創(chuàng)建一個(gè)“關(guān)于”窗體 （缺省名為 frmAbout）。以 Case 加 39。 3． txtFirst文本框的 Change事件 Private Sub txtFirst_Change() ?每當(dāng) txtFirst的內(nèi)容發(fā)生變化時(shí)， ‘將變化結(jié)果隨時(shí)映射到 txtResult。Visual Basic 程序設(shè)計(jì) 北京電大 第三講 應(yīng)用程序接口設(shè)計(jì) 及代碼編寫 [內(nèi)容簡介 ] ? – 圍繞 VB應(yīng)用程序界面設(shè)計(jì)和代碼設(shè)計(jì) – 較系統(tǒng)地分析可視化編程的步驟 – 可視化界面設(shè)計(jì)方法 – 菜單設(shè)計(jì)及窗體設(shè)計(jì)的原則 – 各種常用控件的用法 – 工程化思想和 VB結(jié)構(gòu)化程序設(shè)