WPF VB.Net

  xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  Title="SolidColorBrush Example" Height="415" Width="270">
  
    
      
        From SsRGB value in the Color structure:
      
              Stroke="Blue" />
    

  

//File:Window.xaml.vb
Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Shapes
Namespace WpfApplication1
  Public Partial Class SolidColorBrushExample
    Inherits Window
    Public Sub New()
      InitializeComponent()
      Dim brush As New SolidColorBrush()
      ' From ScRGB values in the Color structure: 
      brush = New SolidColorBrush(Color.FromScRgb(0.5F, 0.7F, 0F, 0.5F))
      rect4.Fill = brush
    End Sub
  End Class
End Namespace