【正文】 入，矩陣元素隨機(jī)產(chǎn)生，范圍在 [2050]之間。 思考： 輸入 10個(gè)同學(xué) 3門(mén)課成績(jī)，求每個(gè)同學(xué)的總分，并按總分從高到低順序輸出。（每個(gè)同學(xué)名次） 思考： 輸出一個(gè) 5 5矩陣的每行最大元素，及最大元素的下標(biāo)值。該矩陣每個(gè)元素為 [1， 100]之間的隨機(jī)整數(shù)。 第十一講 過(guò) 程 一、通用過(guò)程 二、參數(shù)傳遞 三 、變量作用范圍 引例 求 某個(gè)程序段在一個(gè)程序中需要反復(fù)執(zhí)行但不好用循環(huán)控制，通常是把該程序段獨(dú)立出來(lái)，需要的時(shí)候調(diào)用它，這個(gè)有獨(dú)立功能的程序段叫通用過(guò)程 。 8 5 C =8!/(3!*5!) 一、通用過(guò)程 通用過(guò)程和事件過(guò)程合稱為過(guò)程 事件過(guò)程是當(dāng)事件觸發(fā)時(shí)系統(tǒng)自動(dòng)執(zhí)行，而通用過(guò)程被其它程序調(diào)用時(shí)才執(zhí)行。所以編寫(xiě)通用過(guò)程的程序， 既要編寫(xiě)該過(guò)程 ， 又要編寫(xiě)調(diào)用該過(guò)程的主程序 (一般是事件過(guò)程，該事件過(guò)程包含調(diào)用通用過(guò)程的語(yǔ)句 )。 通用過(guò)程又可根據(jù)其是否返回值分為 Sub過(guò)程 和 Function過(guò)程 。 Sub過(guò)程不返回值，而 Function過(guò)程返回一個(gè)值。 Sub過(guò)程和 Function過(guò)程除了在返回值上有區(qū)別外，在 結(jié)構(gòu) 和調(diào)用方式 上也有點(diǎn)區(qū)別。 Sub過(guò)程的結(jié)構(gòu) Private Sub 過(guò)程名 (參數(shù) ) …… End Sub Function 過(guò)程的結(jié)構(gòu) Private Function 過(guò)程名 (參數(shù) ) …… End Function 形式參數(shù) Sub過(guò)程的調(diào)用： 形式 1： call 過(guò)程名 (參數(shù) ) 形式 2：過(guò)程名 參數(shù) Function過(guò)程的調(diào)用 形式：過(guò)程名 (參數(shù) ) 注意： Sub過(guò)程第一種調(diào)用形式，參數(shù)必須括起來(lái)，第二種形式，參數(shù)不能括起來(lái)。 Function過(guò)程通過(guò)過(guò)程名返回值，所以在過(guò)程體中要有給過(guò)程名賦值的語(yǔ)句。 實(shí)在參數(shù) 思考題 :編寫(xiě)一個(gè)求三角形面積的 Function過(guò)程 Form1 過(guò)程 1 過(guò)程 2 Sub過(guò)程和 Function過(guò)程的創(chuàng)建均可采用兩種方法： 直接在代碼窗口輸入過(guò)程的結(jié)構(gòu)語(yǔ)句和過(guò)程語(yǔ)句 通過(guò)“工具”菜單中的添加“過(guò)程” 二、參 數(shù)傳遞 在調(diào)用過(guò)程時(shí)，一般主調(diào)過(guò)程和被調(diào)過(guò)程之間有數(shù)據(jù)傳遞，即將主調(diào)過(guò)程的 實(shí)參 傳遞給被調(diào)的過(guò)程的 形參 。有兩種方式：傳址和傳值 。兩種方式的區(qū)分標(biāo)志是形參前的關(guān)鍵字，形參前加“ ByVal”是傳值，否則是 傳址 ，默認(rèn)是 傳址 。 傳址方式數(shù)據(jù)傳遞可以是雙向的 傳值方式數(shù)據(jù)傳遞是單向的 Dim X As Integer, Y As Integer Private Sub Command1_Click() X = 4 Y = 4 Call S2(X, Y) Print X + Y End Sub Private Sub Form_Click() x = 4 Print x。 Call test(x) Print x End Sub Public Sub test( i As Integer) i = i + 1 End Sub Sub S2(A As Integer, ByVal B As Integer) A = 2 * A B = B + 2 End Sub 關(guān)鍵字 名稱 定義位置 作用域 Public 全局變量 通用聲明段 整個(gè)應(yīng)用程序 Private 窗體 /模塊級(jí)變量 通用聲明段 本窗體 /本模塊 Dim 窗體 /模塊級(jí)變量 通用聲明段 本窗體 /本模塊 過(guò)程級(jí)變量 過(guò)程 本過(guò)程 Static 過(guò)程級(jí)靜態(tài)變量 過(guò)程 本過(guò)程 三、變量作用范圍 VB中變量的作用范圍因定義的關(guān)鍵字的不同和位置的不同而不同 例 在窗體上添加一個(gè)命令按鈕 Command1和 3個(gè)名稱分別為L(zhǎng)abel1， Label2和 Label3的標(biāo)簽，程序運(yùn)行后，連續(xù) 3次單擊命令按鈕后， 3個(gè)標(biāo)簽中顯示的內(nèi)容分別是 _______。 Private x As Integer Private Sub Command1_Click() Static y As Integer Dim z As Integer n = 10 z = n + z y = y + z x = x + z = x = y = z End Sub 上講回顧 VB過(guò)程分為事件過(guò)程和通用過(guò)程，通用過(guò)程又分為Sub過(guò)程 和 Function過(guò)程 。 Sub過(guò)程不返回值， Function過(guò)程返回一個(gè)值。 Sub過(guò)程的調(diào)用有兩種方式： Call 過(guò)程名 (參數(shù) ) 過(guò)程名 參數(shù) Function過(guò)程只有一種調(diào)用方式： 過(guò)程名 (參數(shù) ) 變量的作用范圍因定義變量的關(guān)鍵字不同和定義語(yǔ)句的位置不同而不同。 調(diào)用過(guò)程時(shí)，存在數(shù)據(jù)傳遞，有傳值和傳址兩種形式。 第十二講 常 用 控 件 一、 單選按鈕、復(fù)選框和框架 二、 列表框和組合框 三、 滾動(dòng)條 四、 時(shí)鐘 一、 單選按鈕、復(fù)選框和框架 單選按鈕和復(fù)選按鈕用于提供選項(xiàng)供用戶選擇，往往根據(jù)功能對(duì)其分組，分組用框架。 例：在文本框中輸入字符，通過(guò)單選按紐和復(fù)選框設(shè)置字體、字型 運(yùn)行效果： 引入：?jiǎn)芜x按鈕、復(fù)選框和框架 分析： 設(shè)計(jì)： 重要屬性 屬性 默認(rèn)值 含義 Caption 單選 Option1 顯示的文本（在字母的前面加 amp?？蓜?chuàng)建熱鍵 ) 復(fù)選 Check1 Font 字體：字體、字型、字號(hào) Visible True 是否可見(jiàn) Value 單選 False 是否選中（ True：選中； False：沒(méi)選） 復(fù)選 0 是否選中（ 0：沒(méi)選中； 1：選中； 2：灰色） Style 0(Standard) 樣式 重要事件： Click 單擊事件 重要方法： Set Focus 獲得焦點(diǎn) 同一容器的一組單選按鈕，某個(gè)時(shí)刻只能有一個(gè)被選中，默認(rèn)第一個(gè)被選中。 思考題 1： 思考題 2 思考題 3 二、組合框和列表框 組合框和列表框也是提供選項(xiàng)供用戶選擇 ,主要用于選項(xiàng)比較多的情形。 例：在組合框中選擇字體，在列表框中選擇字號(hào)、字型，示例中的文字按選擇的字體、字號(hào)和字型設(shè)置其格式。 運(yùn)行效果： 引入：組合框和列表框 分析： 布局分析： 控制邏輯分析： 設(shè)計(jì)： 組合框和列表框的主要屬性 屬性 組合框 列表框 Text 被選中項(xiàng)目的項(xiàng)目值 被選中項(xiàng)目的項(xiàng)目值 (屬性窗口無(wú) ) List(i) 第 I+1項(xiàng)的項(xiàng)目值（從 0開(kāi)始） 第 I+1項(xiàng)的項(xiàng)目值（從 0開(kāi)始） ListCount 項(xiàng)目數(shù) 項(xiàng)目數(shù) ListIndex 當(dāng)前選中項(xiàng)目的索引號(hào) 當(dāng)前選中項(xiàng)目的索引號(hào) (未選中為 1) Style 0下拉式組合框 1簡(jiǎn)單組合框 2下拉式列表框 0標(biāo)準(zhǔn)顯示 1復(fù)選顯示 MultiSelect 無(wú) 0不允許復(fù)選 1簡(jiǎn)單復(fù)選 2擴(kuò)展復(fù)選 Selectd(i) 無(wú) 選擇狀態(tài) Sorted 是否自動(dòng)按字母順序排序 是否自動(dòng)按字母順序排序 組合框和列表框的 Style屬性的對(duì)比 項(xiàng)目值 : 第一項(xiàng) : (0) (0) 最后一項(xiàng) : () () 第 I項(xiàng) : (I1) (I1) 選中的項(xiàng) : 或 () () 主要方法 （ 1） AddItem 項(xiàng)目 ， [N] 添加項(xiàng)目，須指明待添加的項(xiàng)目， N指示加入的位置，省略即加在最后。 （ 2） ReMoveItem N 刪除項(xiàng)目，須指明代刪項(xiàng)目的索引號(hào)。 （ 3） Clear 項(xiàng)目的清除 主要事件： Click 、 Chang(組合框特有 ) 例：在組合框中單擊項(xiàng)目可將項(xiàng)目移動(dòng)到列表框中；在列表框中雙擊項(xiàng)目可將項(xiàng)目移動(dòng)到組合框中。 運(yùn)行效果： 引入：組合框和列表框的方法 分析： 布局分析： 控制邏輯分析：在組合框中選擇項(xiàng)目用單擊事件，刪除項(xiàng)目須用 RemoveItem方法，在列表框中添加項(xiàng)目用AddItem方法。 設(shè)計(jì)： 拓展練習(xí) 思考題 設(shè)計(jì)一程序如下圖： 窗體裝載，在組合框中添加 100個(gè) 3~100之間的隨機(jī)整數(shù)； 單擊“判定”可判斷選中的數(shù)是不是素?cái)?shù)，結(jié)果用Picture1顯示，如果是，添加到 List1中，不是則添加到 List2中，并統(tǒng)計(jì)素?cái)?shù)和非素?cái)?shù)的個(gè)數(shù)，判斷完后將組合框中該項(xiàng)目刪除。 上講回顧 單選按鈕、復(fù)選框的 Value屬性值說(shuō)明其狀態(tài)： 單選按鈕的 Value值是 邏輯型數(shù)據(jù) ，值為 True表示選中，值為 False表示未選中，復(fù)選框的 Value值是 數(shù)值型數(shù)據(jù) ，值為 1表示選中值，為 0表示未選中。 兩個(gè)控件的主要事件是單擊事件，主要方法是獲得焦點(diǎn)方法（ SetFocus） 組合框和列表框的主要屬性 第 i項(xiàng)的項(xiàng)目值 (i1) (i1) 被選中項(xiàng)目的索引號(hào) 被選中項(xiàng)目的項(xiàng)目值 () 或 () 組合框和列表框的主要是事件 組合框： Click()、 Chang()、 KeyPress() 列表框： Click() 組合框和列表框的主要方法 添加項(xiàng)目： AddItem 項(xiàng)目值 刪除項(xiàng)目： ReMoveItem 索引號(hào) 三、滾動(dòng)條 VB中 ,滾動(dòng)條往往用來(lái)獲取數(shù)據(jù)，有兩種 :水平滾動(dòng)條和垂直滾動(dòng)條。 例： 用滾動(dòng)條設(shè)置文本框中文本的字號(hào) 運(yùn)行效果： 引入：滾動(dòng)條 分析： 布局分析 控制邏輯 設(shè)計(jì) 第十三講 常用控件 屬性 默認(rèn)值 含義 Max 可變最大值 Min 可變最小值 LargeChange 單擊滾動(dòng)條空白區(qū)域時(shí)改變的值 SmallChange 單擊兩端按鈕時(shí)改變的值 Value 當(dāng)前值 滾動(dòng)條的主要屬性： 滾動(dòng)條的主要事件： Change 事件、 Scroll 事件 Change事件是在值改變后觸發(fā)（ 單擊兩端按鈕、單擊滾動(dòng)區(qū)域、拖動(dòng)劃塊結(jié)束 ）， Scroll事件是在值改變過(guò)程中觸發(fā)（ 拖動(dòng)劃塊 ） 思考題：用滾動(dòng)條改變圖片的高度和寬度 四、時(shí)鐘控件 時(shí)鐘控件往往用來(lái)實(shí)現(xiàn)每隔一個(gè)時(shí)間間隔重復(fù)做某件事。 例：設(shè)計(jì)可顯示系統(tǒng)時(shí)間的時(shí)鐘。 運(yùn)行效果： 引出：時(shí)鐘控件 分析： 布局分析： 控制邏輯分析：運(yùn)行窗體，不顯示系統(tǒng)時(shí)間，時(shí)鐘控件為無(wú)效，單擊“開(kāi)始”顯示系統(tǒng)時(shí)間，應(yīng)該在單擊事件中添加使時(shí)鐘控件有效的代碼；單擊“停止”系統(tǒng)時(shí)間不再改變，應(yīng)該在單擊事件中添加使時(shí)鐘控件無(wú)效的代碼。 設(shè)計(jì)： 時(shí)鐘控件的主要屬性： Enabled： 是否有效； Interval： 間隔的時(shí)間（毫秒為單位） 主要事件： Timer事件 思考題 1：設(shè)計(jì)一倒計(jì)時(shí)時(shí)鐘 思考題 2：設(shè)計(jì)一個(gè)彈球程序 五、 圖形有關(guān)的控件 和圖形有關(guān)的標(biāo)準(zhǔn)控件有 4個(gè) : 圖片框控件（ Picture） 圖像框控件（ Image） 畫(huà)線控件（ Line） 形狀控件（ Shape） 圖片 框 控件和圖像 框 控件相似，都可以裝入圖形文件，可以在設(shè)計(jì)時(shí)通過(guò)屬性窗口設(shè)置 Picture屬性，也可以在運(yùn)行程序時(shí)借助 LoadPicture函數(shù)設(shè)置。兩者的不同之處： （ 1）圖像框比圖片框占用內(nèi)存少； （ 2）圖片框是容器控件； （ 3）圖片框有 Print方法可輸出文本； （ 4）圖片框有 AutoSize屬性，可調(diào)整其大小適應(yīng)圖片大??；而圖像框有 Stretch屬性，可調(diào)整圖形的大小適應(yīng)圖像框的大小。 畫(huà)線控件和形狀控件可進(jìn)行簡(jiǎn)單繪圖。這兩個(gè)控件不支持任何事件，只用于表面修飾。 畫(huà)線控件 Line用來(lái)畫(huà)一條直線，其 BorderWidth、 BorderStyle，分別決定所畫(huà)線段的寬度和形狀，另外兩個(gè)坐標(biāo)點(diǎn)（