软件程序的超炫按钮的轻松打造----visual basic篇

    软件开发者要想软件吸引客户的眼光，固然是打造软件的界面风格，如打造相似Windows XP、Java、Flat风格的按钮吗？只要在你的程序中加上BSE控件，简简单单的一行代码，就能够轻松实现多达16种风格的按钮，彻底使你抛弃了繁杂的代码！下面咱们就结合一个实例来讲明使用方法，并展现该控件实现的强大功能！但如何实现呢？

net平台

集成开发环境：

编程语言visual basic

let'start 

只要在你的viusal basic程序中加上BSE控件，简简单单的一行代码，就能够轻松实现多达16种风格的按钮，彻底使你抛弃了繁杂的代码！下面咱们就结合一个实例来讲明使用方法，并展现该控件实现的强大功能！

   BSE控件一个能够实现15种不一样的风格，经过设置控件的SchemeStyle属性，咱们能够很容易的控制窗口界面中CommandButton的风格。SchemeStyle的属性设置与其实现风格的对应关系如表一所示: 

SchemeStyle属性	效果风格及说明
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 （渐变色背景风格）
14	Alien Scheme Button Style （具备金属质感的按钮）
15	Bitmap Pattern Scheme Button Style （实现按钮的背景，独立于按钮自己的Picture）

　　了解了按钮的风格后，咱们就能够根据本身的喜爱为所欲为地设置风格了。
　　第一步：首先启动Visual Basic 6.0，新建一个窗口。
　　第二步：加载BSE控件，设置其属性。
　　①在控件工具栏中单击右键，选择“部件”，在弹出的窗口中点击“浏览”，找到BSE控件，载入它；把它添加到Form1窗体中任意位置便可。
　　②修改BSE控件属性。在BSE控件上单击右键，选择“属性”。在弹出的属性页设置窗口中选择“Options”，如图1，根据须要自行设置其中属性。图：

其中，设置“Pattern Bitmap Images”的图片仅当SchemeStyle值设置为15时有效，它就是按钮显示的背景图片。“Gradient Scheme Options”仅当SchemeStyle值设置为13时有效，它能够设置背景渐变色的方向和起始、终止颜色。“Border Highlight Effect Options”能够设置部分风格的按钮点击时的边框颜色。
　　第三步：加载其余控件，完成界面的设置。
　　①在窗体中添加4个CommandButton控件，名称分别为Command一、Command二、Command三、Command4，其中设置后两个按钮的Style属性为“1－Gradical”，再设置它们的picture，为它们添加两个合适的图片（如图2）。按钮的其余设置具体参看图2。
　　②添加一个option控件数组，名称为“option1”，index从0到15。caption设置如图2所示。
　　到这里就完成了这个演示程序的界面设置，接着进行代码的编写。图

接下来，编写code，实现具体的功能。 
　　①编写Form1的Load事件，使程序启动时commandbutton显示为您说设置的风格，这里采用第一种风格，即Windows XP Blue风格。代码以下：

Private Sub Form_Load() 　　　BSE1.SchemeStyle = 0 　　　BSE1.EndSubClassing 　　　BSE1.InitSubClassing 　　End Sub

　　②添加option控件数组的事件，使能够根据选择option来转换commandbutton的不一样风格。

Private Sub Option1_Click(Index As Integer) 　　　BSE1.SchemeStyle = Index 　　　BSE1.EndSubClassing 　　　BSE1.InitSubClassing  　　End Sub

　　③编写退出程序的代码，再Command4的Click事件中加入以下代码：

If BSE1.EngineStarted Then  　　　BSE1.EndSubClassing '卸载BSE控件 　　End If 　　Unload Me

　　到这里，这个简单的演示程序就完成了，是否是很简单呢？只要短短的几行代码就能够实现如此酷的按钮。快按下F5，运行一下，effect，图：

你能够点击不一样的OptionButton。

固然，你嫌不够，能够自定义添加

adiOS