or


<Window x:Class="RadChartViewSimpleTest" xmlns:chart="clr-namespace:Telerik.Windows.Controls;assembly=Telerik.Windows.Controls.Chart" xmlns:chartView="clr-namespace:Telerik.Windows.Controls.ChartView;assembly=Telerik.Windows.Controls.Chart" xmlns:telerik="http://schemas.telerik.com/2008/xaml/presentation" Width="300" Height="300"> <Grid> <Grid.ColumnDefinitions> <ColumnDefinition /> <ColumnDefinition /> </Grid.ColumnDefinitions> <DataGrid ItemsSource="{Binding}" /> <chart:RadCartesianChart Grid.Column="1"> <chart:RadCartesianChart.HorizontalAxis> <chartView:LinearAxis /> </chart:RadCartesianChart.HorizontalAxis> <chart:RadCartesianChart.VerticalAxis> <chartView:LinearAxis Maximum="100" /> </chart:RadCartesianChart.VerticalAxis> <chart:RadCartesianChart.Series> <chartView:ScatterLineSeries x:Name="ScatterLineSeries1" ItemsSource="{Binding}" /> </chart:RadCartesianChart.Series> </chart:RadCartesianChart> </Grid></Window>Imports Telerik.Windows.ControlsImports Telerik.Windows.Controls.ChartViewPublic Class RadChartViewSimpleTest Public Sub New() InitializeComponent() Dim Points As New List(Of Point) For i As Integer = 0 To 150 Step 5 Points.Add(New Point(i, i)) Next For i As Integer = 0 To 150 Step 5 Points.Add(New Point(155 + i, i)) Next Me.DataContext = Points Dim genericBinding As New GenericDataPointBinding(Of Point, Double) genericBinding.ValueSelector = Function(t As Point) t.X ScatterLineSeries1.XValueBinding = genericBinding genericBinding = New GenericDataPointBinding(Of Point, Double) genericBinding.ValueSelector = Function(t As Point) t.Y ScatterLineSeries1.YValueBinding = genericBinding End SubEnd Class