'Imports System.ComponentModel
'Imports System.Drawing.Design

'Public Class BorderControl
'    Inherits UserControl

'#Region " Windows Form Designer generated code "

'    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
'        '
'        'BorderControl
'        '
'        Me.BackColor = System.Drawing.Color.White
'        Me.Name = "BorderControl"
'        Me.Size = New System.Drawing.Size(208, 192)

'    End Sub

'#End Region

'    Private SideValue As Border3DSide
'    Private Style3DValue As Border3DStyle

'    Public Sub New()
'        Side = Border3DSide.Bottom
'        Style3D = Border3DStyle.Etched
'        BackColor = Color.White
'    End Sub

'    Protected Overloads Overrides Sub OnPaint(ByVal e As PaintEventArgs)
'        MyBase.OnPaint(e)
'        ControlPaint.DrawBorder3D(e.Graphics, ClientRectangle, Style3D, Side)
'    End Sub

'    <Category("BorderControl"), DefaultValue(GetType(Border3DSide), "Bottom"), Description("Specifies the sides of the panel to apply a three-dimensional border to.")> _
'    Public Property Side() As Border3DSide
'        Get
'            Return SideValue
'        End Get
'        Set(ByVal Value As Border3DSide)
'            If Side <> Value Then
'                SideValue = Value
'                Invalidate()
'            End If
'        End Set
'    End Property

'    <Category("BorderControl"), DefaultValue(GetType(Border3DStyle), "Etched"), Description("Specifies the style of the three-dimensional border.")> _
'    Public Property Style3D() As Border3DStyle
'        Get
'            Return Style3DValue
'        End Get
'        Set(ByVal Value As Border3DStyle)
'            If Style3D <> Value Then
'                Style3DValue = Value
'                Invalidate()
'            End If
'        End Set
'    End Property

'    <Category("BorderControl"), DefaultValue(GetType(Color), "White")> _
'    Public Overrides Property BackColor() As Color
'        Get
'            Return MyBase.BackColor
'        End Get
'        Set(ByVal Value As Color)
'            MyBase.BackColor = Value
'        End Set
'    End Property
'End Class