vb6的繪圖方法-國防大學中正理工學院.ppt

VB6 的繪圖方法與常用函數 常用繪圖方法（Method）指令 Cls Clear Screen，清除螢幕 用點、線、圓….等繪圖方法所畫出的圖形或是用 Print 輸出的字串，都可以用Cls 方法來加以清除。 語法 [Object].Cls 物件.Cls 常用繪圖方法、指令(續) Pset 用來畫任意顏色的點 語法 [Object.]Pset[Step](X, Y)[, color] 其中的 X, Y 是單精度變數，因此可以使用小數數值、變數。如果不指定 color 引數，就以 ForeColor 屬性的顏色為顏色。 如果將color 引數，設定為 BackColor就會有「消除」的效果。 常用繪圖方法、指令(續) Point 可以讀取任意點的顏色值 語法 [Object.]Point(X, Y) 常用繪圖方法、指令(續) Line 畫一條線 語法 B：畫框 BF：畫框且填滿 常用繪圖方法、指令(續) Circle 畫圓 語法 Radius：半徑 Start：弧的起點 End：弧的終點 Aspec：長短軸比 牛刀小試(1) 試寫一程式，模擬小畫家的噴霧、畫筆與畫線的功能 牛刀小試(1)---續 牛刀小試(1)---續 屬性設定 PictureBox (Picture1) AutoRedraw：True Appearance：0 – 平面 BorderStyle：1 – 單線固定 ScaleMode：3 – 像素 Shape (Shape1(0)~(15)) CommandButton (Command1~5) Caption：如圖示 Command4(0)~(3)表示線條寬度設定 牛刀小試(1)---續 牛刀小試(1)---續 牛刀小試(1)---續 常用的字串函數 Left() 傳回字串左邊指定數量的字元 語法 Left_str=Left(Str, n) 將Str字串的左邊n個字元放到Left_str中 n為小數時，則系統會自動將n以四捨五入轉成整數型態 如果nStr的長度時，將傳回全部字串 常用的字串函數(續) Right() 傳回字串右邊指定數量的字元 語法 Right_str=Right(Str, n) 將Str字串的右邊n個字元放到Right_str中 n為小數時，則系統會自動將n以四捨五入轉成整數型態 如果nStr的長度時，將傳回全部字串 常用的字串函數(續) Mid() 傳回字串中間指定數量的字元 語法 Mid_str=Mid(Str,n) 將Str字串的第n個字元起後的全部字元放到Mid_str中 Mid_str=Mid(Str,n,m) 將Str字串的第n個字元起後的m個字元放到Mid_str中 常用的字串函數(續) Len() 傳回字串的長度 語法 Len_str=Len(Str) 將Str字串長度的值放到Len_str中 常用的字串函數(續) LTrim() 、Trim() 、RTrim() 刪除字串中的空白字元 L_str=LTrim(Str) 傳回Str字串左邊不含空白字元的字串 T_str=Trim(Str) 傳回Str字串左右兩邊不含空白字元的字串 R_str=RTrim(Str) 傳回Str字串右邊不含空白字元的字串 常用的字串函數(續) Space() 重複空白字元 語法 Space_str=Space(n) 傳回n個空白的字元 常用的字串函數(續) String() 重複特定字元 語法 String_str=String(n,Str) 傳回n個Str字串的第一個字元 常用的字串函數(續) Asc() 字元轉成Ascii碼 語法 Asc_str=Asc(Str) 傳回Str字串的第一個字元轉成Ascii碼 常用的字串函數(續) Tab() 定位函數 語法 Tab(n) 目前游標所在行的最前面開始，向右邊移動n個位置 與Print指令搭配使用 常用的轉換函數 Int_str=Val(Str) 將字串轉為數值型態 Str_str=Str(Int) 將數值轉為字串型態 CV=FormatCurrency(X,n,vbTrue 或 vbFalse) 將數值資料轉為貨幣值格式 FP=FormatPercent (X,n,vbTrue 或 vbFalse) 將數值資料格式化為百分比格式 常用的轉換函數(續) FN=FormatNumber (X,n,vbTrue 或 vbFalse) 將數值資料格式化 DV=FormatDateTime(X,[顯示日期時間的格式]) 假令X=#5/5/2003 10:10:19 PM# 則顯示日期時間的格式為 0 ? 日期與時間 2003/5/5 PM 10:10:19 1 ? 完整日期 2003年5月5日 2 ? 簡短日