張家港中等專業學校
設為首頁 | 加入收藏 | 網站地圖
 學校首頁 | 學校介紹 | 新聞中心 | 教學管理 | 黨建工作 | 師生園地 | 教學部門 | 招生就業 | 專題網站 | 對外交流 
師生園地
 名師風采 
 課堂内外 
 班級網站 
 心理健康 
 優秀學子 
當前位置: 學校首頁>>師生園地>>課堂内外>>計算機世界>>正文
利用VB三維面闆控件設計流動條
2014-04-28 17:00   (閱讀次數:)

VB提供了一個三維面闆控件,利用這個控件可設計圖形效果的立體界面,從而使應用程序的界面顯得更生動、美觀,該控件還可以設置各種形式的背景,然後在背景上顯示各種形式的字符,令人感興趣的是,使用三維面闆控件,還可設計我們經常在安裝程序中看到的表示安裝進程的流動條,并可顯示進程百分比,改變流動條的顔色等。  一、介紹屬性   FloodColor:确定流動條的顔色,缺省為藍色。   FloodPercent:顯示當前過程如流動條進行的百分比,參數改變時顯示的百分數和流動條的面積改變,設為一整型值,取值範圍是0~100。   FloodShowpct:決定是否在三維面闆控件上顯示百分比,是一個邏輯值。為 True時顯示,為False時不顯示。   FloodType:表示用戶對三維面闆控件的使用方式。可取值有 6個,如下所示:    0 缺省設置    1 表示流動條方向從左到右    2 表示流動條方向從右到左    3 表示流動條方向從上到下    4 表示流動條方向從下到上    5 表示使用指定的顔色從圓心向外畫圓  二、流動條設計   如果在Windows3X下,工具箱中不存在三維面闆控件,可選擇File菜單中的“Add File…”進行添加,在彈出的對話框中找到WindowsSystem目錄,然後選定Threedvbx文件即可,如果使用VB4.0,需在Tools菜單中選擇 Custom Controls命令,選定Sheridan 3d Controls項,按OK按鈕,可在工具箱中增加三維面闆控件。   啟動VB30,在窗體中畫一水平方向的長方形三維面闆控件,按F4,在屬性窗口中設置其Name為P3d,Bevellnner為2-Raised,FloodType為1,FloodshowPct為True,再在窗體中畫一個按鈕Command1,雙擊該按鈕,鍵入下面的代碼:    Sub Command1_Click()    P3dfloodpercent=0    For N%=1 To 100    If N%>100 THEN    Exit Sub    End If    P3dFloodPercent=N%    Next I%    End Sub  按F5,運行該程序,點擊Command按鈕,即可看到流動條效果。

關閉窗口

江蘇省張家港中等專業學校  地址:江蘇省張家港市沙洲西路109号
ICP備案号:蘇ICP備10015337号