计算机程式VisualBASIC程式设计.ppt

計算機程式Visual BASIC 程式設計 四海工商專校 電算中心 廖文淵 E-Mail: andres@sitc.edu.tw Chapter 11 繪圖 1. VB座標系統 使用繪圖區域或收納器的座標系統圖形作業 調整大小、移動和繪圖 定義表單和控制項的位置 使用座標 (x, y)定義表單格線的位置 表單使用座標 (x, y)定義格線的位置 x 值是沿 x 軸的位置，最左方是預設位置 0 y 值是沿 y 軸的位置，最上端是預設位置 0 座標系統使用規則 收納器: 表單為收納器 : 在表單上繪製、移動、調整控制項的大小 框架或控制項為收納器 : 框架或圖片方塊裡繪製控制項時 圖形和 Print 方法，皆使用收納器的座標系統 用來移動或調整表單大小的陳述式，必然是在格線上表示表單的位置和大小 建立程式碼時，先檢查 Screen 物件的 Height 和 Width 屬性，以確定表單在螢幕上大小是否合適 預設座標 : 螢幕、收納器左上角是（0，0） 刻度 : 定義沿座標軸位置的測量單位，每個軸都有自己的刻度 twips 預設情況下 所有 VB 的移動、調整大小和圖形繪製的陳述式，皆使用一個 twip 為單位 1twip = 印表機解析點的 1/20 1440 twips = 1英吋 567 twips = 1公分 可指定物件列印出來的大小 螢幕上的實體距離的變動是根據顯示器的大小 設定座標系統(1) -- 使用預設刻度 使用表單和圖片方塊刻度屬性預設值 ScaleLeft ScaleTop ScaleWidth ScaleHeight ScaleMode 物件預設刻度左上角座標 = （0，0） 預設刻度單位為 twips 使用沒有引數的 Scale 方法: 傳回預設的刻度 設定座標系統(2) -- ScaleMode屬性 0 - 使用者定義，直接設定ScaleWidth、ScaleHeight、ScaleTop 或 ScaleLeft，則 ScaleMode 屬性會自動地設定為 0 1 - Twips，VB預設刻度，1440 twips = 1英吋 2 - 點，72 點 = 1英吋 3 - 映像點，顯示器或印表機解析度的最小單位。每英吋裡映像點的數目是由週邊設備的解析度來決定 4 - 字元，列印時，一個字元是 1/6 英吋高、1/12 英吋寬 5 - 英吋 6 - 公厘 7 - 公分 除了 0 和 3，其餘模式都可引用為列印的長度 ScaleMode = 5 設定表單的刻度單位為英吋 picPicture1.ScaleMode = 3 設定 picPicture1 的刻度單位為映像點 設定座標系統(3) -- 自訂刻度 ScaleLeft、ScaleTop 屬性: 指定物件左上角的數值 ScaleLeft = 100 ScaleTop = 100 picArena.ScaleLeft = 100 picArena.ScaleTop = 100 ScaleWidth、ScaleHeight 屬性: 根據繪圖區域目前的寬度和高度定義單位 ScaleWidth = 1000 定義表單內部寬度的水平單位 1/1，000 ScaleHeight = 500 表單內部高度的垂直單位為 1/500 Scale 方法 語法： [object.]Scale (x1, y1) - (x2, y2) x1、y1 : 決定 ScaleLeft 和 ScaleTop 屬性的設定 兩個x-座標和兩個 y-座標之間的差異分別決定 ScaleWidth 和 ScaleHeight 屬性的設定 Scale (100, 100)-(200, 200) 定義表單為 100 單位寬和 100 單位高 x1 x2 或 y1 y2 的值，則與設定 ScaleWidth 或 ScaleHeight 為負值的效果相同 2. 色彩 由Long 整數表示，其值在指定色彩的所有內容中，皆具有相同的涵義 在執行階段有四種方法可用來指定色彩值： ?使用 RGB 函數 ?使用 QBColor 函數 選取 Microsoft QuickBasic(R) 16 種色彩中的一種 ?使用表列在「瀏覽物件」中的內部常數之一 ?直接輸入色彩值 (1) 使用 RGB 函數 給定GRB三數值輸入到 RGB 函數 從 0 到 255 中的數值 0 表示亮度最低，255 表示亮度最高 使用紅-綠-藍的排列順序 指定結果到色彩屬性或色彩引數 設定背景為綠色。 Form1.BackColor = RGB(0, 128, 0) 設定背景為黃色。 Form2.BackColor = RGB(255, 255, 0) 設定點為深藍色。 PSet (100, 100)