表單的圖形輸出系統;淺談繪圖敘述
輸出顏色設定
屬性 |
說明 |
BackColor(背景顏色) |
設定表單的背景顏色 |
ForeColor(前景顏色) |
文字或圖形在表單上輸出的顏色選擇,內定為黑色 |
FillColor(塗抹顏色) |
繪圖時,用來塗抹圖形區域的顏色 |
FillStyle(塗抹樣式) |
繪圖時,用來指定是否塗抹圖形區域的屬性,【0-實心】則以FillColor屬性設定的顏色來塗抹圖形區域,【1-透明】不塗抹圖形區域,也就是保持原來的顏色 |
RGB函數
呼叫格式:X =
RGB(R ,G ,B)
顏色 |
R值 |
G值 |
B值 |
顏色 |
R值 |
G值 |
B值 |
黑 |
0 |
0 |
0 |
灰 |
128 |
128 |
128 |
藍 |
0 |
0 |
255 |
暗藍 |
0 |
0 |
128 |
綠 |
0 |
255 |
0 |
暗綠 |
0 |
128 |
0 |
青 |
0 |
225 |
255 |
暗青 |
0 |
128 |
128 |
紅 |
255 |
0 |
|
暗紅 |
128 |
0 |
0 |
紫 |
255 |
0 |
255 |
暗紫 |
128 |
0 |
128 |
黃 |
255 |
255 |
0 |
暗黃 |
128 |
128 |
0 |
白 |
255 |
255 |
255 |
亮灰 |
192 |
192 |
192 |
QBColor函數
參數 |
顏色 |
參數 |
顏色 |
0 |
黑 |
8 |
灰 |
1 |
暗藍 |
9 |
藍 |
2 |
暗綠 |
10 |
綠 |
3 |
暗青 |
11 |
青 |
4 |
暗紅 |
12 |
紅 |
5 |
暗紫 |
13 |
紫 |
6 |
暗黃 |
14 |
黃 |
7 |
亮灰 |
15 |
白 |
實作演練:製作一會變換背景顏色的表單
Dim Index As Integer '宣告在Timer1_Timer()之外
Private Sub Timer1_Timer()
Form1.BackColor = QBColor(Index)
Index = Index + 1
If Index > 15 Then Index = 0
End Sub
Line敘述
作用 |
格式 |
說明 |
畫線 |
Line
(x1,y1)-(x2,y2),顏色 |
顏色為畫線的顏色,若省略則為 ForeColor表單前景顏色 |
畫方形 |
Line
(x1,y1)-(x2,y2),顏色,B
Line (x1,y1)-(x2,y2),顏色, BF
(x1,y1),(x2,y2)分別為方形的兩對角點 |
參數 BF:方形內部顏色與邊線相同
參數B:方形內部顏色由FillColor與FillStyle決定 |
CurrentX、CurrentY屬性
當執行表單的輸出敘述後,VB會把最後的座標記錄在
CurrentX、CurrentY屬性中
實例:用Line畫一星型
Private Sub Command1_Click()
Line (1245, 375)-(525, 1665)
Line -(2085, 765)
Line -(480, 765)
Line -(2010, 1740)
Line -(1245, 375)
End Sub
Circle敘述
作用 |
格式 |
說明 |
圓 |
Circle (x,y),半徑【,邊框顏色】 |
省略【,邊框顏色】則為ForeColor表單前景顏色,內部顏色由FillColor與FillStyle決定 |
圓弧 |
Circle (x,y),半徑【,邊框顏色】,起始角度,終止角度 |
起始角度,終止角度為弳度 |
扇形 |
Circle (x,y),半徑【,邊框顏色】,起始角度,終止角度 |
起始角度,終止角度為弳度負值,內部顏色由FillColor與FillStyle決定 |
橢圓 |
Circle (x,y),半徑【,邊框顏色】,起始角度,終止角度,縱橫比 |
起始角度,終止角度可省略
縱橫比=1:圓形
縱橫比>1:左右窄
縱橫比<1:上下窄 |
影響圖形輸出的屬性
屬性 |
說明 |
屬性 |
說明 |
DrawStyle
(邊線樣式) |
0-實線
1-破折線
2-點線
3-破折線-點線
4-破折線-點線-點線
5-透明
6-內實線 |
FillStyle
(塗抹樣式) |
0-實心
1-透明
2-水平線
3-垂直線
4-左上右下斜線
5-左下右上斜線
6-垂直交叉線
7-對角交叉線 |
本網頁由昱得資訊工作室製作(C)
Copyright Valor-Sttudio since in 1993
|