Thanks
For Each dColor As Double In {0, 0.25, 0.5, 0.75, 1}.Reverse()
Dim oLegendItem As New MapLegendItemElement("", Color.White)
oLegendItem.EnableBorderHighlight = False
oLegendItem.BorderWidth = 0 ' Remove black outline?
oLegendItem.Margin = New Padding(0)
oLegendItem.Padding = New Padding(0)
oLegendItem.MinSize = New Size(20, 10)
oLegendItem.HorizontalLineWidth = 0
oLegendItem.BorderBottomColor = Color.White
oLegendItem.BorderTopColor = Color.White
oLegendItem.BorderTopWidth = 0
oLegendItem.BorderBottomWidth = 0
oLegendItem.DrawBorder = False
oLegendItem.BackColor = Color.White
oLegendItem.BackColor2 = Color.White
oLegendItem.BackColor3 = Color.White
oLegendItem.BackColor4 = Color.White
oLegendItem.BorderBottomShadowColor = Color.White
oLegendItem.BorderColor = Color.White
oLegendItem.BorderColor2 = Color.White
oLegendItem.BorderColor3 = Color.White
oLegendItem.BorderColor4 = Color.White
oLegendItem.BorderInnerColor = Color.White
oLegendItem.BorderInnerColor2 = Color.White
oLegendItem.BorderInnerColor3 = Color.White
oLegendItem.BorderInnerColor4 = Color.White
oLegendItem.ShadowColor = Color.White
oLegendItem.BorderInnerColor4 = Color.White
oLegendItem.BorderThickness = New Padding(10)
oLegendItem.BorderHighlightThickness = 0
oLegendItem.DrawFill = False
.ItemStackElement.Children.Add(oLegendItem)
Next
With .ItemStackElement
.BackColor = Color.White
.BackColor2 = Color.White
.BackColor3 = Color.White
.BackColor4 = Color.White
.BorderBottomShadowColor = Color.White
.BorderColor = Color.White
.BorderColor2 = Color.White
.BorderColor3 = Color.White
.BorderColor4 = Color.White
.BorderInnerColor = Color.White
.BorderInnerColor2 = Color.White
.BorderInnerColor3 = Color.White
.BorderInnerColor4 = Color.White
.ShadowColor = Color.White
.BorderInnerColor4 = Color.White
.ElementSpacing = 0 ' Remove spacing
.EnableElementShadow = False
.DrawBorder = False
.EnableFocusBorder = False
.BorderColor = Color.White
.BorderBottomColor = Color.White
.BorderWidth = 0
.EnableBorderHighlight = False
.DrawBorder = False
.BorderBottomWidth = 0
.BorderBottomWidth = 0
.BorderThickness = New Padding(0)
.BorderHighlightThickness = 0
End With
End With