vb.net按钮 vbnet按钮圆角

vb.netbutton改名由代码找到button

vb.net教程之vb.net的Button控件

vb.net的Button控件

Button(按钮)控件一般接受鼠标单击事件被用来启动、中断或结束一个进程（相当于Visual Basic以前版本的CommandButton控件）。单击Button控件时将调用已写入Click事件过程中的过程。Button控件在大多数Visual Basic应用程序中都会用到，用户可以单击按钮执行操作。单击时，按钮不仅能执行相应的操作，而且看起来与被按下和松开一样。Button控件在工具箱中的图标如图所示：

1.向窗体添加按钮

在应用程序中很可能要使用多个按钮。就象在其他容器控件上绘制按钮那样，从工具箱里把Button控件直接拖到窗体上即可。可用鼠标调整按钮的大小，也可通过设置Location（坐标，用来确定控件相对窗体左上方顶点的位置）和Size（大小，第一个参数代表宽度，第二个参数代表高度）属性进行调整。

2.设置按钮显示文本

可用Text属性改变按钮上显示的文本。设计时，可在控件的“属性窗口”中设置此属性。在设计时设置Text属性后将动态更新按钮文本。Text属性最多包含255个字符。若标题超过了命令按钮的宽度，则会折到下一行。但是，如果控件无法容纳其全部长度，则标题会被剪切。可以通过设置Font属性改变在命令按钮上显示的字体。

3.创建键盘快捷方式

可通过Text属性创建按钮的访问键快捷方式。为此，只需在作为访问键的字母前添加一个连字符（）。例如，要为标题“Ok”创建访问键，应在字母“O”前添中连字符，于是得到“Ok”。运行时，字母“O”将带下划线，同时按Alt+O键就可执行单击按钮程序所执行的动作。

注意：如果不创建访问键，而又要使标题中包含连字符，应添加两个连字符（）。这样，在标题中就只显示一个连字符。

4.选定按钮

运行时，可用鼠标或键盘通过下述方法选定按钮：

(1)用鼠标单击按钮；

(2)按Tab键，将焦点转移到按钮上，然后按Enter键选定按钮；

(3)按按钮的访问键（[Alt+带有下划线的字母]）。

5.Click事件

运行时单击按钮，将触发按钮的Click事件并执行写入Click事件过程中的代码，同时，单击按钮的过程也将生成MouseMove、MouseLeave、MouseDown和MouseUp等事件。如果要在这些相关事件中附加事件过程，则应确保操作不发生冲突。对控件的操作不同，这些事件过程发生的顺序也不同。Button控件的单击事件发生顺序为：

MouseMove→MouseDown→Click→MouseUp→MouseLeave

注意：如果用户试图双击按钮控件，则其中每一次单击都将分别处理；也即按钮控件不支持双击事件。

6.增强按钮的视觉效果

按钮控件象复选框和选项按钮一样，可通过Image属性设置Button控件上的图标以增强视觉效果，然后设置图标（图片）的属性：ImageAlign显示图标（图片）的位置。通过设置ImageIndex（图片在图片框中的索引）以及ImageList（图片框）则可实现如下的效果，比如要向按钮添加图标或位图，或者在单击、禁止控件时显示不同的图象等等。

相关问答

Q1: vb.net 平面按钮

本来有个属性FlatStyle设置为Popup基本上能实现这个情况，怎奈有个线框怎么也弄不掉。FlatAppearance.BorderSize设置为0不起作用，只对Flat有用，所以用代码在Flat和Popup两种风格之间切换。

'在鼠标进入时设置为浮雕风格

Private Sub Button1_MouseEnter(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseEnter

Button1.FlatStyle = FlatStyle.Popup

End Sub

'离开时设置为平面风格，这样像标签一样只剩下文字，当然要FlatAppearance.BorderSize设置为0

Private Sub Button1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.MouseLeave

Button1.FlatStyle = FlatStyle.Flat

End Sub

'另外把UseVisualStyleBackColor 设置为 False也会好看一点。

Q2: vb.net的简单按钮编写 我刚刚接触这个求教

   Dim I As Integer

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Button1.Text = "继续"

        TextBox1.Text = I

        I = I + 1

    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        I = 2

    End Sub

代码如上 如图的效果

Q3: 在VB。NET中怎么样给按钮添加快捷键

如果是用Alt组合健，最简单的方法就是，在按钮的Text属性里加个符合，比如想用Alt+A来控制Button1的话，就在Button1的Text属性上加一个A即可。比如Text属性是“我是按钮(A)”，如图所示，那么在按下Alt+A就可以执行Button1_Click命令了，呵呵

Q4: vb.net 怎么在右上角增加按钮

制作一个按钮：

Dim my_Button As New Button

my_Button.SetBounds(Me.Width - 75, 0, 75, 23)

Me.Controls.Add(my_Button)

在软件运行前是看不到这个按钮，运行后可见，运行后想更改按钮位置，简单的方法启动一个事件，如textbox输入数值后通过Button的点击事件修改my_Button的顶点位置，还有的方法就是拖动，拖动应该是高级编程部分而且几十行代码，没有人愿意写

Q5: vb.net如何触发excel内的一个按钮的单击事件

一定要先在VB中添加excel引用。

在工程中引用Microsoft Excel类型库： 从"工程"菜单中选择"引用"栏；选择Microsoft Excel 11.0 Object Library（EXCEL2003），然后选择"确定"。表示在工程中要引用EXCEL类型库。

调用excel的工作表中的命令按钮，代码如下：

Private Sub Command1_Click()

Dim xlApp As Excel.Application

Dim xlBook As Excel.WorkBook

Dim xlSheet As Excel.Worksheet

Dim FileName, SheetName As String

FileName = "e:\data.xls" '打开的工作簿路径名称

SheetName = "sheet1" '命令按钮所在的工作表名

Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象

Set xlBook = xlApp.Workbooks.Open(FileName) '打开已经存在的EXCEL工件簿文件

……

xlBook.Close (True) '保存并关闭工作簿

xlApp.Quit '结束EXCEL对象

Set xlApp = Nothing '释放xlApp对象

end sub

关于vb.net按钮和vbnet按钮圆角的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。