VB編程實現(xiàn)圖像的漂亮效果

字號:

本文講解了如何通過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 開始特效
    生成最后的窗體