有如圖一這樣一個(gè)應(yīng)用程序,分別拖動(dòng)紅、綠、藍(lán)三個(gè)滾動(dòng)框來(lái)決定文本框的背景色,另外還有一個(gè)豎向滾動(dòng)條,可以用來(lái)控制文本框的大小。
一、圖像的著色問(wèn)題:
自然界中千變?nèi)f化的色彩,在電腦上可以用紅綠藍(lán)三種原色組合而成,這也正是圖像處理軟件中 RGB 模式的原理所在,如黑色是由皆為 0 的紅綠藍(lán)三種顏色組成,白色為皆為 255 的三原色合成,等等。
在 RGB 模式中,每種色彩最多有 255 種變化,也就是說(shuō),只要 R 、G 、B 三種色彩都在各自的 255 范圍內(nèi),這種色彩就是有效的。
在 VB 中,也用 RGB 來(lái)作為色彩的描述,如文本框的背景色為白色,則表示為:Text1.Backcolor = RGB(255,255,255)。
二、VB 中對(duì)象的初值儲(chǔ)存問(wèn)題:
在VB中,常常會(huì)對(duì)某個(gè)對(duì)象進(jìn)行位置移動(dòng),或者動(dòng)態(tài)改變對(duì)象的尺寸,一般情況下,都會(huì)在程序調(diào)入后先對(duì)原始數(shù)據(jù)進(jìn)行一些存儲(chǔ),以便發(fā)生位移或改變大小后能恢復(fù)原樣,而這一功能,是通過(guò)初值儲(chǔ)存來(lái)完成的。
方法是,將原始數(shù)據(jù),如坐標(biāo)值、原始長(zhǎng)寬高,等等,賦值給某個(gè)變量,最后通過(guò)變量的調(diào)用就能完成默認(rèn)狀態(tài)的恢復(fù)。
三、程序設(shè)計(jì):
1、創(chuàng)建如圖一的程序界面。
文本框的屬性:
Name:TxtContent Text:None
三個(gè)表示色彩的標(biāo)簽:
紅色標(biāo)簽,Name:LblRed Caption:紅色
綠色標(biāo)簽,Name:LblGreen Caption:綠色
藍(lán)色標(biāo)簽,Name:LblBlue Caption:藍(lán)色
三個(gè)表示色彩的橫向滾動(dòng)條:
Min:0 Max:255 SmallChange:1 LargeChange:5
顯示“大小”字樣的標(biāo)簽:
Name:LblSize Caption:大小
對(duì)文本框大小進(jìn)行控制的豎向滾動(dòng)條:
Name:VsbSize Min:0 Max:100 SmallChange:1 LargeChange:5
用于顯示大小變化尺寸的標(biāo)簽:
Name:LblShow Caption:None
2、雙擊紅色滾動(dòng)條,在彈出的程序代碼窗口中輸入:
Private Sub HsbRed_Change()
TxtContent.BackColor = RGB(HsbRed.Value, HsbGreen.Value, HsbBlue.Value)
End Sub
另外,就 HsbRed 的 Scroll 事件也輸入上面的代碼:
Private Sub HsbRed_Scroll()
TxtContent.BackColor = RGB(HsbRed.Value, HsbGreen.Value, HsbBlue.Value)
End Sub
一、圖像的著色問(wèn)題:
自然界中千變?nèi)f化的色彩,在電腦上可以用紅綠藍(lán)三種原色組合而成,這也正是圖像處理軟件中 RGB 模式的原理所在,如黑色是由皆為 0 的紅綠藍(lán)三種顏色組成,白色為皆為 255 的三原色合成,等等。
在 RGB 模式中,每種色彩最多有 255 種變化,也就是說(shuō),只要 R 、G 、B 三種色彩都在各自的 255 范圍內(nèi),這種色彩就是有效的。
在 VB 中,也用 RGB 來(lái)作為色彩的描述,如文本框的背景色為白色,則表示為:Text1.Backcolor = RGB(255,255,255)。
二、VB 中對(duì)象的初值儲(chǔ)存問(wèn)題:
在VB中,常常會(huì)對(duì)某個(gè)對(duì)象進(jìn)行位置移動(dòng),或者動(dòng)態(tài)改變對(duì)象的尺寸,一般情況下,都會(huì)在程序調(diào)入后先對(duì)原始數(shù)據(jù)進(jìn)行一些存儲(chǔ),以便發(fā)生位移或改變大小后能恢復(fù)原樣,而這一功能,是通過(guò)初值儲(chǔ)存來(lái)完成的。
方法是,將原始數(shù)據(jù),如坐標(biāo)值、原始長(zhǎng)寬高,等等,賦值給某個(gè)變量,最后通過(guò)變量的調(diào)用就能完成默認(rèn)狀態(tài)的恢復(fù)。
三、程序設(shè)計(jì):
1、創(chuàng)建如圖一的程序界面。
文本框的屬性:
Name:TxtContent Text:None
三個(gè)表示色彩的標(biāo)簽:
紅色標(biāo)簽,Name:LblRed Caption:紅色
綠色標(biāo)簽,Name:LblGreen Caption:綠色
藍(lán)色標(biāo)簽,Name:LblBlue Caption:藍(lán)色
三個(gè)表示色彩的橫向滾動(dòng)條:
Min:0 Max:255 SmallChange:1 LargeChange:5
顯示“大小”字樣的標(biāo)簽:
Name:LblSize Caption:大小
對(duì)文本框大小進(jìn)行控制的豎向滾動(dòng)條:
Name:VsbSize Min:0 Max:100 SmallChange:1 LargeChange:5
用于顯示大小變化尺寸的標(biāo)簽:
Name:LblShow Caption:None
2、雙擊紅色滾動(dòng)條,在彈出的程序代碼窗口中輸入:
Private Sub HsbRed_Change()
TxtContent.BackColor = RGB(HsbRed.Value, HsbGreen.Value, HsbBlue.Value)
End Sub
另外,就 HsbRed 的 Scroll 事件也輸入上面的代碼:
Private Sub HsbRed_Scroll()
TxtContent.BackColor = RGB(HsbRed.Value, HsbGreen.Value, HsbBlue.Value)
End Sub

