WPF

<ResourceDictionary
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    xmlns:local="clr-namespace:DiagramDesigner">


    <ResourceDictionary.MergedDictionaries>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Styles/Shared.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Styles/ToolBar.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Styles/GroupBox.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Styles/Expander.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Styles/ScrollBar.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/ApplicationToolbar.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/DesignerItem.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/ToolboxItem.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Toolbox.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Connection.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Stencils/FlowChartStencils.xaml"/>
        <ResourceDictionary Source="/DiagramDesigner;component/Resources/Stencils/ShapeStencils.xaml"/>
    </ResourceDictionary.MergedDictionaries>

    <Style TargetType="{x:Type local:DiagramEditor}">
        <Setter Property="Template">
            <Setter.Value>
                <ControlTemplate TargetType="{x:Type local:DiagramEditor}">
                    <Border Background="{TemplateBinding Background}"
                            BorderBrush="{TemplateBinding BorderBrush}"
                            BorderThickness="{TemplateBinding BorderThickness}">
                    </Border>
                </ControlTemplate>
            </Setter.Value>
        </Setter>
    </Style>
</ResourceDictionary>

<UserControl x:Class="DiagramDesigner.DiagramEditor"
             xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
             xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
             xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" 
             xmlns:d="http://schemas.microsoft.com/expression/blend/2008" 
             xmlns:s="clr-namespace:DiagramDesigner"
             xmlns:c="clr-namespace:DiagramDesigner.Controls"
             mc:Ignorable="d" 
             d:DesignHeight="850" d:DesignWidth="1000">

    <UserControl.Resources>
        <ContextMenu x:Key="DesignerCanvasContextMenu">
            <MenuItem Header="Paste" Command="{x:Static ApplicationCommands.Paste}">
                <MenuItem.Icon>
                    <Image Source="/Resources/Images/Paste.png" Width="16"/>
                </MenuItem.Icon>
            </MenuItem>
            <MenuItem Header="Select All" Command="{x:Static s:DesignerCanvas.SelectAll}"/>
        </ContextMenu>
        
    </UserControl.Resources>
  
    <Grid>

        <Grid Margin="10">
            <Grid.RowDefinitions>
                <RowDefinition Height="Auto"/>
                <RowDefinition Height="*"/>
            </Grid.RowDefinitions>

            <ContentControl Content="{DynamicResource  MyToolbar}"/>
       
            <Grid Grid.Row="1" Margin="0,10,0,0">
                <Grid.ColumnDefinitions>
                    <ColumnDefinition Width="265"/>
                    <ColumnDefinition/>
                </Grid.ColumnDefinitions>
                <!-- Toolbox -->
                <StackPanel Grid.Column="0" Margin="0,0,5,0">
                    <Expander Header="Flow Chart" Content="{DynamicResource FlowChartStencils}" IsExpanded="True"/>
                    <Expander Header="Shapes" Content="{DynamicResource ShapeStencils}" IsExpanded="True"/>
                </StackPanel>
                <!-- GridSplitter -->
                <GridSplitter Focusable="False" Width="2" Background="LightGray"
                    VerticalAlignment="Stretch" HorizontalAlignment="Right"/>
                <!-- Designer -->
                <GroupBox Header="Diagram" Grid.Column="1" Margin="3,0,0,0">
                    <ScrollViewer HorizontalScrollBarVisibility="Auto"
                      VerticalScrollBarVisibility="Auto">
                        <s:DesignerCanvas Focusable="true" x:Name="MyDesigner"
                            Background="{DynamicResource WindowBackgroundBrush}"
                            Margin="10" FocusVisualStyle="{x:Null}"
                            ContextMenu="{DynamicResource DesignerCanvasContextMenu}"/>
                    </ScrollViewer>
                </GroupBox>
            </Grid>
        </Grid>

    </Grid>
</UserControl>

System.Windows.Forms.Integration.ElementHost elementHost1 = new System.Windows.Forms.Integration.ElementHost();
      DiagramEditor diagramEditor = new DiagramEditor();

  private void LoadControls()
      {
          elementHost1.Dock = DockStyle.Fill;
          //elementHost1.Height = 850;
          //elementHost1.Width = 1000;
          elementHost1.BackColorTransparent = true;
          elementHost1.Child = diagramEditor;

          panel1.Controls.Add(elementHost1);
      }

<Window x:Class="MainWindow"
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"<br />
    xmlns:empns="clr-namespace:TestWPFVBApplication.ViewModel"
    Title="MainWindow" Height="350" Width="525">
    <Window.DataContext>
        <empns:EmployeeViewModel x:Name="_employeeViewModel" EmpId="1" EmpName="Abdul" EmpSalary="10000.00"
                DeptId="1">
            </empns:EmployeeViewModel>
    </Window.DataContext>
    <Grid>

    </Grid>
</Window>

Namespace TestWPFVBApplication.ViewModel
    Public Class EmployeeViewModel
        Implements INotifyPropertyChanged, IDataErrorInfo

        Private _empId As Integer
        Public Property EmpId() As Integer
            Get
                Return _empId
            End Get
            Set(ByVal value As Integer)
                _empId = value
                NotifyPropertyChanged("EmpId")
            End Set
        End Property

        Private _empName As String
        Public Property EmpName() As String
            Get
                Return _empName
            End Get
            Set(ByVal value As String)
                _empName = value
                NotifyPropertyChanged("EmpName")
            End Set
        End Property

        Private _empSalary As Decimal
        Public Property EmpSalary() As Decimal
            Get
                Return _empSalary
            End Get
            Set(ByVal value As Decimal)
                _empSalary = value
                NotifyPropertyChanged("EmpSalary")
            End Set
        End Property

        Private _deptId As Integer
        Public Property DeptId() As Integer
            Get
                Return _deptId
            End Get
            Set(ByVal value As Integer)
                _deptId = value
                NotifyPropertyChanged("DeptId")
            End Set
        End Property

        Private _employees As ObservableCollection(Of Employee)
        Public Property Employees() As ObservableCollection(Of Employee)
            Get
                Return _employees
            End Get
            Set(ByVal value As ObservableCollection(Of Employee))
                _employees = value
                NotifyPropertyChanged("Employees")
            End Set
        End Property

        Private _error As String
        Public ReadOnly Property [Error] As String Implements IDataErrorInfo.Error
            Get
                Return _error
            End Get
        End Property

        Default Public ReadOnly Property Item(columnName As String) As String Implements IDataErrorInfo.Item
            Get
                If (columnName = "") Then
                    Return _error
                End If
                Return String.Empty
            End Get
        End Property

        Public Event PropertyChanged(sender As Object, e As PropertyChangedEventArgs) Implements INotifyPropertyChanged.PropertyChanged

        Private Property CanExecute As Boolean

        Private Sub NotifyPropertyChanged(propertyName As String)
            RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs(propertyName))
        End Sub

        Private _clickSaveCommand As ICommand
        Public ReadOnly Property ClickSaveCommand() As ICommand
            Get
                Return If(_clickSaveCommand, (InlineAssignHelper(_clickSaveCommand, New SaveEmployeeCommand(Sub() AddAnItem(), CanExecute))))
            End Get
        End Property

        Private Shared Function InlineAssignHelper(Of T)(ByRef target As T, ByVal value As T) As T
            target = value
            Return value
        End Function

        Private Sub AddAnItem()
            _employees.Add(New Employee(_empId, _empName, _empSalary, _deptId))
        End Sub

    End Class
End Namespace

xmlns:empns="clr-namespace: TestWPFVBApplication.ViewModel.EmployeeViewModel"

<Window.DataContext>
    <empns:EmployeeViewModel x:Name="_employeeViewModel" EmpId="1" EmpName="Abdul" EmpSalary="10000.00"
            DeptId="1">
        </empns:EmployeeViewModel>
</Window.DataContext>

     static NPAFinSvcClient GetNPAFinServiceClient()
        {
            string url = string.Empty;
~#if DEBUG
            url = "http://localhost:49223/NPAFinSvc.svc";
~endif
            NPAFinSvcClient client = new NPAFinSvcClient(GetBinding(), new EndpointAddress(new Uri(url, UriKind.RelativeOrAbsolute)));
            foreach (OperationDescription op in client.ChannelFactory.Endpoint.Contract.Operations)         {
                DataContractSerializerOperationBehavior dataContractBehavior = op.Behaviors.Find<DataContractSerializerOperationBehavior>() as DataContractSerializerOperationBehavior;
                if (dataContractBehavior != null)
                {
                    dataContractBehavior.MaxItemsInObjectGraph = int.MaxValue;
                }
            }
            client.Open();
            return client;
        }

        static BasicHttpBinding GetBinding()
        {
~if Release
            var binding = new BasicHttpBinding(BasicHttpSecurityMode.Transport);            
~else
            var binding = new BasicHttpBinding(BasicHttpSecurityMode.None);         
~endif
            binding.MaxReceivedMessageSize = int.MaxValue;
            binding.MaxBufferSize = int.MaxValue;
            binding.SendTimeout = new TimeSpan(2, 0, 0);
            binding.ReceiveTimeout = new TimeSpan(2, 0, 0);
            binding.ReaderQuotas.MaxArrayLength = int.MaxValue;
            binding.ReaderQuotas.MaxBytesPerRead = int.MaxValue;
            binding.ReaderQuotas.MaxDepth = int.MaxValue;
            binding.ReaderQuotas.MaxNameTableCharCount = int.MaxValue;
            binding.ReaderQuotas.MaxStringContentLength = int.MaxValue;
            return binding;
        }

public class MyTag
    {
        public decimal MyValue { get; set; }
        public string MyDescription { get; set; }
        public bool Enabled { get; set; }
    }

public class Attached : DependencyObject
{
    public static readonly DependencyProperty MyTagProperty =
        DependencyProperty.RegisterAttached("MyTag", typeof(MyTag), typeof(Attached),
            new FrameworkPropertyMetadata(null,
                FrameworkPropertyMetadataOptions.BindsTwoWayByDefault | FrameworkPropertyMetadataOptions.Inherits));

    public static MyTag GetMyTag(DependencyObject dObj)
    {
        return dObj.GetValue(MyTagProperty) as MyTag;
    }

    public static void SetPLCTag(DependencyObject dObj, MyTag value)
    {
        dObj.SetValue(MyTagProperty, value);
    }
}

<Button
                x:Name="button"
                Width="75"
                general:Attached.MyTag="{Binding First}"   // First is an object of type MyTag
                Content="{Binding Path=(general:Attached.MyTag.MyValue)}"/>

// create the slide (this sets the datacontext)
CtrlMySlide slide = new CtrlMySlide();
slide.Visibility = System.Windows.Visibility.Visible;

Dispatcher.Invoke(new Action(() => 
{ 
    // this method loads the viewmodel used in the bindings, and 
    // is also called to called to actually display the slide when 
    // selected from the liistbox
    slide.RenderCard(this.FiscalPeriod, item, true);
    // I thought calling these methods would cause the slide to 
    // render itself in memory, but evidently, it's not enough
    slide.Measure(new Size(1024d,768d));
    slide.Arrange(new Rect(0,0,1024,768));
    slide.UpdateLayout();
}), DispatcherPriority.ApplicationIdle, null);
// this method actually saves the slide to the desired file 
// formats
slide.Save(result, true);