如何更改Button的边框颜色？

Question

我是Visual Basic的新手，我想更改Button的边框颜色，但我在IDE（Visual Studio 2017）中看不到任何选项。有没有办法做到这一点？

Answer 1

执行此操作的方法并不十分明显，因为默认Button不允许使用彩色边框。

首先，您必须将Button的{​​{1}}属性设置为FlatStyle。然后，您必须将FlatStyle.Flat的{​​{1}}属性设置为您选择的颜色。

如果需要，您可以在Visual Studio表单设计器中执行这两项操作，或者可以使用以下代码执行此操作：

Button

Answer 2

你可以这样做是几种不同的方式。一个选项（ 快速简便 ）是继承FlatAppearance.BorderColor类，然后覆盖Button1.Flatstyle = FlatStyle.Flat Button1.FlatAppearance.BorderColor = Color.Yellow 方法......

例如：

System.Windows.Forms.Button

另一个选择是创建自己的按钮控件，这需要时间，你可以更好地受益，因为你可以更好地控制你想做的事情。如果您的按钮的OnPaint属性设置为“平面”，则可以更改设计器中的 Protected Overrides Sub OnPaint(ByVal pevent As System.Windows.Forms.PaintEventArgs) MyBase.OnPaint(pevent) Dim rect As New Rectangle(0, 0, Me.Width, Me.Height) Dim mPen As New Pen(Color.Red, 3) pevent.Graphics.DrawRectangle(mPen, rect) End Sub 属性，例如border-size等...

Answer 3

Button1.BorderColor = Drawing.Color.Red

Answer 4

您可以继承System.Windows.Forms.Button类，然后通过重写OnPaint受保护的方法创建自己的类：

Protected Overrides Sub OnPaint _
(ByVal pevent As System.Windows.Forms.PaintEventArgs)
    MyBase.OnPaint(pevent)
    Dim rect As New Rectangle(0, 0, Me.Width, Me.Height)
    Dim mypen As New Pen(Color.Green, 5)
    pevent.Graphics.DrawRectangle(mypen, rect)
End Sub

但是，如果按钮的FlatStyle属性设置为“Flat”，则可以更改设计器中的FlatApperance属性，例如border-size，border-color等。