BlockThread.xaml : Thread « Windows Presentation Foundation « VB.Net

1. VB.Net
2. Windows Presentation Foundation
3. Thread

BlockThread.xaml

     
<Window x:Class="WPFThreading.BlockThread"
  xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
  xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
  Title="UI Thread Blocker" Height="275" Width="225"
  >
  <Window.Resources>
    <Style TargetType="{x:Type Button}">
      <Setter Property="Height" Value="20" />
      <Setter Property="Background" Value="Beige"/>
      <Setter Property="Margin" Value="2" />
    </Style>
    <Style TargetType="{x:Type Label}">
      <Setter Property="FontWeight" Value="Bold" />
      <Setter Property="Margin" Value="2" />
    </Style>
    <Style TargetType="{x:Type TextBox}">
      <Setter Property="Margin" Value="2" />
    </Style>
  </Window.Resources>
  <Border Width="200" Height="225" BorderBrush="Black" 
    BorderThickness="1" Margin="4">
    <StackPanel>

      <Label>Simulate Long-Running Process</Label>
      <Button Name="button1" Click="button1_click">Go to sleep</Button>

      <Label>Will I respond?</Label>
      <Button Name="button2" Click="button2_click">Try Me</Button>

      <Label>Output Messages</Label>
      <TextBox Name="textbox1"/>

      <Label/>

      <StackPanel Orientation="Horizontal">
        <Label>UI thread:</Label>
        <Label Name="UIThreadLabel"></Label>
      </StackPanel>

      <StackPanel Orientation="Horizontal">
        <Label>BG thread:</Label>
        <Label Name="BackgroundThreadLabel"></Label>
      </StackPanel>

    </StackPanel>
  </Border>
</Window>

//File:Window.xaml.vb

Imports System.Windows

Namespace WPFThreading

  Public Partial Class BlockThread
    Inherits System.Windows.Window

    Public Sub New()
      InitializeComponent()

      Me.UIThreadLabel.Content = Me.Dispatcher.Thread.ManagedThreadId
      Me.BackgroundThreadLabel.Content = "N/A"
    End Sub
    Private Sub button1_click(sender As Object, e As RoutedEventArgs)
      System.Threading.Thread.Sleep(5000)
      Me.textbox1.Text = "Done Sleeping..."
    End Sub

    Private Sub button2_click(sender As Object, e As RoutedEventArgs)
      Me.textbox1.Text = "Hello WPF"
    End Sub

  End Class
End Namespace

   
    
    
    
    
  

Related examples in the same category

1.	Create a multi threaded web browsing application.
2.	Show a Continuous Animation During an Asynchronous Process
3.	Load the Data for a Window Asynchronously After It Has Rendered
4.	Check Whether You Are Running on the UI Thread
5.	Ensure That You Are Running on the UI Thread
6.	A Cancellable ProgressBar While Processing on a Background Thread
7.	Show a Continuous Progress Bar While Processing on a Background Thread
8.	Execute a Method Asynchronously Using the Dispatcher Queue
9.	Thread Sleep in Button Click handler
10.	Execute a Method Asynchronously Using a Background Worker Thread
11.	Track the Progress of a Background Worker Thread
12.	Support the Cancellation of a Background Worker Thread
13.	Create a Background Worker Thread in XAML
14.	WPF Threading
15.	Keep the UI from becoming non-responsive in single threaded application which performs a long operation.