本文講解了如何通過VB編程實現(xiàn)圖像的漂亮效果。
參數(shù)表-----------------------------------------------------
Angle 光照傾角,取值0到90之間,以角度為單位
WidthOfArea 光照區(qū)寬度,取值大于1的整數(shù),以像素為單位
Speed 光照區(qū)運動速度,取值大于1的整數(shù)
EnhanceRatio 光照強度參數(shù),取值大于1的整數(shù)
-----------------------------------------------------
好,原理就這么多,現(xiàn)在我們開始動手實現(xiàn)吧!打開VB6.0,選擇新建標準EXE工程,在主窗口form1中繪制下表中所列控件并設置窗體和各控件的屬性。
控件 屬性 設置
Form1 Name Form1
ScaleMode 3-pixel
PictureBox Name PicDest
ScaleMode 3-pixel
Picture 背景圖
PictureBox Name PicSource
ScaleMode 3-pixel
Picture 主體圖
Label Name LblA
Caption 角度
Textbox Name TxtA
Text 30
Label Name LblW
Caption 寬度
Textbox Name TxtW
Text 15
Label Name LblE
Caption 強度
Textbox Name TxtE
Text 15
Label Name LblS
Caption 速度
Textbox Name TxtS
Text 1
CommandButton Name Cmd1
Caption 開始特效
生成最后的窗體
參數(shù)表-----------------------------------------------------
Angle 光照傾角,取值0到90之間,以角度為單位
WidthOfArea 光照區(qū)寬度,取值大于1的整數(shù),以像素為單位
Speed 光照區(qū)運動速度,取值大于1的整數(shù)
EnhanceRatio 光照強度參數(shù),取值大于1的整數(shù)
-----------------------------------------------------
好,原理就這么多,現(xiàn)在我們開始動手實現(xiàn)吧!打開VB6.0,選擇新建標準EXE工程,在主窗口form1中繪制下表中所列控件并設置窗體和各控件的屬性。
控件 屬性 設置
Form1 Name Form1
ScaleMode 3-pixel
PictureBox Name PicDest
ScaleMode 3-pixel
Picture 背景圖
PictureBox Name PicSource
ScaleMode 3-pixel
Picture 主體圖
Label Name LblA
Caption 角度
Textbox Name TxtA
Text 30
Label Name LblW
Caption 寬度
Textbox Name TxtW
Text 15
Label Name LblE
Caption 強度
Textbox Name TxtE
Text 15
Label Name LblS
Caption 速度
Textbox Name TxtS
Text 1
CommandButton Name Cmd1
Caption 開始特效
生成最后的窗體