通過(guò)使用【顏色】對(duì)話(huà)框,用戶(hù)可方便地從中選取所需要的顏色。單擊通用對(duì)話(huà)框控件【屬性頁(yè)】對(duì)話(huà)框的【顏色】選項(xiàng)卡,如圖6.13所示,從中可以設(shè)置【顏色】對(duì)話(huà)框的顏色(color)與標(biāo)志(Flags)屬性(也可以在【屬性】窗口中設(shè)置)。顏色(Color)屬性用來(lái)設(shè)置或返回在【顏色】對(duì)話(huà)框中選定的顏色值,每個(gè)顏色值對(duì)應(yīng)一種顏色。如255對(duì)應(yīng)紅色,0對(duì)應(yīng)黑色,17777215對(duì)應(yīng)白色,……
【顏色】對(duì)話(huà)框的標(biāo)志(Flags)屬性有4種可能值,如表6.11所示。
實(shí)例6.5使用【顏色】對(duì)話(huà)框
在該程序中,用戶(hù)可以通過(guò)【顏色】對(duì)話(huà)框來(lái)選取標(biāo)簽的背景色,并且能顯示出所選顏色的顏色值。
在窗體中放置兩個(gè)標(biāo)簽控件、一個(gè)文本框控件、一個(gè)按鈕控件和一個(gè)通用對(duì)話(huà)框控件。其中各對(duì)象的屬性如表6.12所示。
Private Sub ComColor_Click()
DiaColor.Acttion=3 LabColor.BackColor=DiaColor.Color TexColor.Text=DiaColor.Color End Sub |
運(yùn)行該程序,單擊【設(shè)置顏色】按鈕,在彈出的【顏色】對(duì)話(huà)框中選擇一種顏色,單擊【確定】按鈕,標(biāo)簽的背景色就變成了用戶(hù)在【顏色】對(duì)話(huà)框中所選取的顏色了,如圖6.15所示。
北京 | 天津 | 上海 | 江蘇 | 山東 |
安徽 | 浙江 | 江西 | 福建 | 深圳 |
廣東 | 河北 | 湖南 | 廣西 | 河南 |
海南 | 湖北 | 四川 | 重慶 | 云南 |
貴州 | 西藏 | 新疆 | 陜西 | 山西 |
寧夏 | 甘肅 | 青海 | 遼寧 | 吉林 |
黑龍江 | 內(nèi)蒙古 |