【文章內容簡介】 = Green = Blue = = RGB (Red, Green, Blue) End Sub 程序設計語言 (VB) 27 本章 目錄 圖形框和圖像框 1．圖形框 PictureBox控件 ?作用 :顯示圖片，也可作為其他控件的容器 ?在程序運行時裝入圖形 ： 圖形框 .Picture = LoadPicture(圖形文件名 ) 刪除圖形框中圖形： 圖形框 .Picture=LoadPicture(“”) Autosize屬性 True 圖形框自動調整大小與圖片匹配 False 圖形超過圖形框的部分將被剪裁掉 Pictrue練習 程序設計語言 (VB) 28 本章 目錄 2．圖像框 Image ?圖像框占用更少的內存，描繪得更快。 ?圖像框內不能存放其他控件。 Stretch屬性 False 圖像框自動改變大小適應其中的圖形 True 圖形根據(jù)圖像框的大小自動調整尺寸 例 本例說明圖像框的 Stretch屬性 對加載的圖形的影響。 程序設計語言 (VB) 29 本章 目錄 定時器 定時器以一定的時間間隔產(chǎn)生 Timer事件 . ? 屬性 Enabled 為 False時定時器不產(chǎn)生 Timer事件 Interval 觸發(fā) Timer事件的時間間隔 (ms) ? 事件 定時器控件只有一個 Timer事件 產(chǎn)生 Timer事件條件 Enabled=True。 Interval0 例 7補 每隔一秒顯示一次 “ Hello！” 例 設計一個按秒倒計時 應用程序 例 用一個定時器控制蝴蝶 在窗體內的飛舞 程序設計語言 (VB) 30 本章 目錄 這次練習數(shù)組的編程，請大家不要翻書，自己獨立完成： ? 隨機產(chǎn)生 100~200（包括 100和 200）的 10個正整數(shù)，求最大值、最小值、平均值，并輸出全部數(shù)組的值和相應計算結果。 ? 將 60， 67， 52， 50， 66， 41， 32這幾個數(shù)有小到大排序。 （可以使用 Array函數(shù)為數(shù)組賦值。） 程序設計語言 (VB) 31 本章 目錄 菜單設計 ?菜單有 下拉式菜單 和 彈出菜單 (上下文菜單 )。 ?下拉式菜單的組成結構： 快捷鍵 熱鍵 子菜單標記 主菜單 菜單項 子菜單名 分隔線 程序設計語言 (VB) 32 本章 目錄 菜單編輯器 單擊 “ 標準 ” 工具欄中 按鈕 打開 “工具”菜單 選擇 “ 菜單編輯器 ” /窗體上點右鍵 菜單列表框 菜單屬性 操作按鈕 菜單和菜單下的菜單項 也是控件。 程序設計語言 (VB) 33 本章 目錄 用來輸入菜單名或命令名 (Caption) (1)分隔符：連接符“ ” (2)訪問鍵： 訪問字母前加“ amp?！? 頂層菜單的打開： ALT+對應字母 菜單項選擇：打開菜單后，按 對應字母 . 程序設計語言 (VB) 34 本章 目錄 用來輸入代碼中引用該菜單控件的名字 (Name)。 為用戶建立的 控件數(shù)組 設立下標 （ Index） 快捷鍵 : 在運行時 ,按下對應的組合鍵，會立刻執(zhí)行一個菜單命令 ,不用打開菜單 . 即 單步操作 （頂層菜單不能設置） 程序設計語言 (VB) 35 本章 目錄 縮進級： 把選定的菜單向右 (左 )移一個等級 ....。 最多可以創(chuàng)建四級子菜單 。 把選定的菜單項在同級菜單內向上（下）移動一個位置 Enabled屬性 Visible屬性 Checked屬性 ?應用例題：菜單項的事件 Click()， 為菜單項編寫程序。 程序設計語言 (VB) 36 本章 目錄 彈出菜單 彈出菜單（又稱快捷菜單） 是獨立于菜單欄而顯示在窗體上的，顯示內容取決于按下鼠標時指針的位置。 ?設計過程與普通菜單相同 。 ?菜單彈出的方法： [對象 .]PopupMenu 菜單名 [, 標志 , x, y] 標志 ：表示彈出的位置和觸發(fā)的鍵。 例 為例 彈出式菜單練習 程序設計語言 (VB) 37 本章 目錄 位置 常數(shù) 值 描述 vbPopupMenuLeftAlign 0(默認 ) 指定位置為 左邊界 vbPopupMenuCenterAlign 4 指定位置為 中心 vbPopupMenuRightAlign 8 指定位置為 右邊界 行為 常數(shù) 值 描述 vbPopupMenuLeftButton 0(默認 ) 只能按 左鍵觸發(fā) vbPopupMenuRightButton 2 按 左鍵和右鍵觸發(fā) 標志 Flags參數(shù) 注：如果從每組中各選一個常數(shù)，可用 OR操作符連接。 彈出菜單 程序設計語言 (VB) 38 本章 目錄 多重窗體 ?指一個應用程序中有多個并列的普通窗體 ， 每個窗體有自己的界面和代碼 ， 完成不同的功能 。 1. 添加窗體 ① 調出“添加窗體”對話框 “工程”菜單 ?選“添加窗體”； 也可以使用工具欄上的“添加窗體”按鈕。 ② 選擇要添加的窗體 “新建”選項卡：新建一個窗體 “現(xiàn)存”選項卡：把一個其他工程的窗體添加到當前工程 ? 同一工程 不能有相同名稱的窗體 。 ? 對添加進來的現(xiàn)存窗體進行修改，會影響到共享該窗體的所有工程。 程序設計語言 (VB) 39 本章 目錄 2. 設置啟動對象 缺省條件下的啟動窗體：默認為第一個創(chuàng)建的窗體 設置方法： ① “ 工程 ” 菜單 ?選 “ 工程屬性 ” 選項； ② 在彈出的對話框中，選擇 “ 啟動對象 ” 下拉列表中的窗體 程序設計語言 (VB)