東坡下載:內(nèi)容最豐富最安全的下載站!

首頁編程開發(fā)VB/asp → Visual Basic中輕松打造絢麗按鈕

Visual Basic中輕松打造絢麗按鈕

相關(guān)文章發(fā)表評(píng)論 來源:本站時(shí)間:2010/10/14 14:02:50字體大。A-A+

更多

作者:東坡下載點(diǎn)擊:2224次評(píng)論:0次標(biāo)簽:

使用示例
  想讓你的程序更加吸引眼球嗎?想在你的程序中打造類似Windows XP、Java、Flat風(fēng)格的按鈕嗎?只要在你的程序中加上BSE控件,簡(jiǎn)簡(jiǎn)單單的一行代碼,就可以輕松實(shí)現(xiàn)多達(dá)16種風(fēng)格的按鈕,完全使你拋棄了繁雜的代碼!下面我們就結(jié)合一個(gè)實(shí)例來說明使用方法,并展示該控件實(shí)現(xiàn)的強(qiáng)大功能!
  BSE控件一個(gè)可以實(shí)現(xiàn)15種不同的風(fēng)格,通過設(shè)置控件的SchemeStyle屬性,我們可以很容易的控制窗口界面中CommandButton的風(fēng)格。SchemeStyle的屬性設(shè)置與其實(shí)現(xiàn)風(fēng)格的對(duì)應(yīng)關(guān)系如表一所示:
SchemeStyle屬性效果風(fēng)格及說明
0 Windows XP Blue Scheme Button Style
1 Windows XP Olive Green Scheme Button Style
2 Windows XP Silver Scheme Button Style
3 Windows Flat Scheme Button Style
4 Windows Hover Scheme Button Style
5 Netscape Scheme Button Style
6 Java Scheme Button Style
7 Windows OLD 3.x Scheme Button Style
8 Office XP Blue Scheme Button Style
9 Office XP OliveGreen Scheme Button Style
10 Office XP Silver Scheme Button Style
11 Office XP SystemColor Scheme Button Style
12 WindowsXP InternetExplorer Scheme Button Style
13 Gradient Scheme Button Style
(漸變色背景風(fēng)格)
14 Alien Scheme Button Style
(具有金屬質(zhì)感的按鈕)
15 Bitmap Pattern Scheme Button Style
(實(shí)現(xiàn)按鈕的背景,獨(dú)立于按鈕本身的Picture)
  了解了按鈕的風(fēng)格后,我們就可以根據(jù)自己的喜好隨心所欲地設(shè)置風(fēng)格了。
  第一步:首先啟動(dòng)Visual Basic 6.0,新建一個(gè)窗口。
  第二步:加載BSE控件,設(shè)置其屬性。
  ①在控件工具欄中單擊右鍵,選擇“部件”,在彈出的窗口中點(diǎn)擊“瀏覽”,找到BSE控件,載入它;把它添加到Form1窗體中任意位置即可。
 、谛薷腂SE控件屬性。在BSE控件上單擊右鍵,選擇“屬性”。在彈出的屬性頁設(shè)置窗口中選擇“Options”,如圖1,根據(jù)需要自行設(shè)置其中屬性。

  其中,設(shè)置“Pattern Bitmap Images”的圖片僅當(dāng)SchemeStyle值設(shè)置為15時(shí)有效,它就是按鈕顯示的背景圖片。“Gradient Scheme Options”僅當(dāng)SchemeStyle值設(shè)置為13時(shí)有效,它可以設(shè)置背景漸變色的方向和起始、終止顏色。“Border Highlight Effect Options”可以設(shè)置部分風(fēng)格的按鈕點(diǎn)擊時(shí)的邊框顏色。
  第三步:加載其他控件,完成界面的設(shè)置。
  ①在窗體中添加4個(gè)CommandButton控件,名稱分別為Command1、Command2、Command3、Command4,其中設(shè)置后兩個(gè)按鈕的Style屬性為“1-Gradical”,再設(shè)置它們的picture,為它們添加兩個(gè)合適的圖片(如圖2)。按鈕的其他設(shè)置具體參看圖2。
 、谔砑右粋(gè)option控件數(shù)組,名稱為“option1”,index從0到15。caption設(shè)置如圖2所示。
  到這里就完成了這個(gè)演示程序的界面設(shè)置,接著進(jìn)行代碼的編寫。


  第四步:編寫代碼,實(shí)現(xiàn)具體的功能。
 、倬帉慒orm1的Load事件,使程序啟動(dòng)時(shí)commandbutton顯示為您說設(shè)置的風(fēng)格,這里采用第一種風(fēng)格,即Windows XP Blue風(fēng)格。代碼如下:
  Private Sub Form_Load()
   BSE1.SchemeStyle = 0
   BSE1.EndSubClassing
   BSE1.InitSubClassing
  End Sub
 、谔砑觨ption控件數(shù)組的事件,使可以根據(jù)選擇option來轉(zhuǎn)換commandbutton的不同風(fēng)格。
  Private Sub Option1_Click(Index As Integer)
   BSE1.SchemeStyle = Index
   BSE1.EndSubClassing
   BSE1.InitSubClassing
  End Sub
 、劬帉懲顺龀绦虻拇a,再Command4的Click事件中加入如下代碼:
  If BSE1.EngineStarted Then
   BSE1.EndSubClassing '卸載BSE控件
  End If
  Unload Me
  到這里,這個(gè)簡(jiǎn)單的演示程序就完成了,是不是很簡(jiǎn)單呢?只要短短的幾行代碼就可以實(shí)現(xiàn)如此酷的按鈕?彀聪翭5,看看效果吧(如圖3)。
  你可以點(diǎn)擊不同的OptionButton,觀看16種不同的按鈕風(fēng)格,相信總有一種會(huì)適合您的程序的。
更多精彩內(nèi)容請(qǐng)點(diǎn)擊

visual studio

專題

相關(guān)評(píng)論

閱讀本文后您有什么感想? 已有 人給出評(píng)價(jià)!

  • 2791 喜歡喜歡
  • 2101 頂
  • 800 難過難過
  • 1219 囧
  • 4049 圍觀圍觀
  • 5602 無聊無聊
熱門評(píng)論
最新評(píng)論
發(fā)表評(píng)論 查看所有評(píng)論(0)
昵稱:
表情: 高興 可 汗 我不要 害羞 好 下下下 送花 屎 親親
字?jǐn)?shù): 0/500 (您的評(píng)論需要經(jīng)過審核才能顯示)