Mega Code Archive

 

Categories / VB.Net / WPF

 

Draw a Sequence of Connected Lines

<Window x:Class="WpfApplication1.Window1"     xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"     xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"     Title="WPF" Height="270" Width="300" Loaded="Window_Loaded">     <Canvas>         <TextBlock Canvas.Top="40" Canvas.Left="20"                    FontSize="14" Text="Static Points Collection" />         <Polyline Stroke="Black" StrokeThickness="3"                    Points="0,0 300,10 300,10 10,10 10,25                   250,250 255,85 250,40 205,85 200,40 155,85 35,90" />         <TextBlock Canvas.Top="150" Canvas.Left="20" Text="Programmatic Points Collection" />         <Polyline Name="plLine" Stroke="Black" StrokeThickness="3" />     </Canvas> </Window> //File:Window.xaml.vb Imports System.Windows Namespace WpfApplication1   Public Partial Class Window1     Inherits Window     Public Sub New()       InitializeComponent()     End Sub     Private Sub Window_Loaded(sender As Object, e As RoutedEventArgs)       plLine.Points.Add(New Point(10, 140))       plLine.Points.Add(New Point(270, 140))       plLine.Points.Add(New Point(10, 175))       plLine.Points.Add(New Point(10, 220))       plLine.Points.Add(New Point(125, 220))     End Sub   End Class End Namespace