VB色の境界menustripを変更する

Question

私のアプリケーションにmenustripを追加し、menustripに境界の色を変更したい。私はいくつかのコードを見つけましたが、画像上に再び境界線があります。

画像：

マイコード：

Public Class ColorTable 
    Inherits ProfessionalColorTable 

    Dim Color1 = Color.FromArgb(30, 38, 44) 
    Dim Color2 = Color.FromArgb(75, 81, 88) 

    Public Overrides ReadOnly Property MenuBorder() As Color 
     Get 
      Return Color1 
     End Get 
    End Property 

    Public Overrides ReadOnly Property MenuItemSelectedGradientBegin() As Color 
     Get 
      Return Color2 
     End Get 
    End Property 

    Public Overrides ReadOnly Property MenuItemSelectedGradientEnd() As Color 
     Get 
      Return Color2 
     End Get 
    End Property 

    Public Overrides ReadOnly Property MenuItemSelected() As Color 
     Get 
      Return Color2 
     End Get 
    End Property 

    Public Overrides ReadOnly Property MenuItemBorder() As Color 
     Get 
      Return Color1 
     End Get 
    End Property 

    Public Overrides ReadOnly Property MenuItemPressedGradientBegin() As Color 
     Get 
      Return Color2 
     End Get 
    End Property 

    Public Overrides ReadOnly Property MenuItemPressedGradientEnd() As Color 
     Get 
      Return Color2 
     End Get 
    End Property 

End Class 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    Menus.Renderer = New ToolStripProfessionalRenderer(New ColorTable()) 
End Sub 

Answer 1

あなたはまた、次のプロパティを上書きしたいしようとしている。

Public Overrides ReadOnly Property SeparatorDark() As Color 
    Get 
     Return Color1 
    End Get 
End Property 

Public Overrides ReadOnly Property ToolStripDropDownBackground() As Color 
    Get 
     Return Color1 
    End Get 
End Property 

これは背景をカバーし、追加するセパレータ。

Answer 2

は私が

 Public Overrides ReadOnly Property ImageMarginGradientBegin() As System.Drawing.Color 
     Get 
      Return Color1 
     End Get 
    End Property 
    Public Overrides ReadOnly Property ImageMarginGradientEnd() As System.Drawing.Color 
     Get 
      Return Color1 
     End Get 
    End Property 
    Public Overrides ReadOnly Property ImageMarginGradientMiddle() As System.Drawing.Color 
     Get 
      Return Color1 
     End Get 
    End Property 

を追加し、現在すべてがOKです:)