Convert the contents of a ListBoxItem to an instance of GridLength by using GridLengthConverter

     

<Window  
    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    x:Class="GridLengthConverter_grid.Window1"
    Title="GridLengthConverter Sample"
    WindowState="Maximized">
  <StackPanel>
      <Grid Name="grid1" ShowGridLines="True" Height="300">
          <Grid.ColumnDefinitions>
            <ColumnDefinition Name="col1" />
            <ColumnDefinition Name="col2" />
            <ColumnDefinition Name="col3" />
          </Grid.ColumnDefinitions>
          <Grid.RowDefinitions>
            <RowDefinition Name="row1" />
            <RowDefinition Name="row2" />
            <RowDefinition Name="row3" />
          </Grid.RowDefinitions>
          <TextBlock Grid.Row="0" Grid.Column="0" TextWrapping="Wrap">Column 0, Row 0</TextBlock>
          <TextBlock Grid.Row="0" Grid.Column="1" TextWrapping="Wrap">Column 1, Row 0</TextBlock>
          <TextBlock Grid.Row="0" Grid.Column="2" TextWrapping="Wrap">Column 2, Row 0</TextBlock>
          <TextBlock Grid.Row="1" Grid.Column="0" TextWrapping="Wrap">Column 0, Row 1</TextBlock>
          <TextBlock Grid.Row="1" Grid.Column="1" TextWrapping="Wrap">Column 1, Row 1</TextBlock>
          <TextBlock Grid.Row="1" Grid.Column="2" TextWrapping="Wrap">Column 2, Row 1</TextBlock>
          <TextBlock Grid.Row="2" Grid.Column="0" TextWrapping="Wrap">Column 0, Row 2</TextBlock>
          <TextBlock Grid.Row="2" Grid.Column="1" TextWrapping="Wrap">Column 1, Row 2</TextBlock>
          <TextBlock Grid.Row="2" Grid.Column="2" TextWrapping="Wrap">Column 2, Row 2</TextBlock>
     </Grid>
       <Slider Name="hs1" Width="100" IsSnapToTickEnabled="True" Maximum="2" TickPlacement="BottomRight" TickFrequency="1" ValueChanged="changeColVal"/>
       <Slider Orientation="Horizontal" Name="hs2" Width="100" IsSnapToTickEnabled="True" Maximum="2" TickPlacement="BottomRight" TickFrequency="1" ValueChanged="changeRowVal" />
       <TextBlock Name="txt1" TextWrapping="Wrap"/>
       <TextBlock Name="txt2" TextWrapping="Wrap"/>
       <ListBox Width="50" Height="50" SelectionChanged="changeCol">
           <ListBoxItem>25</ListBoxItem>
           <ListBoxItem>50</ListBoxItem>
           <ListBoxItem>75</ListBoxItem>
           <ListBoxItem>100</ListBoxItem>
           <ListBoxItem>125</ListBoxItem>
           <ListBoxItem>150</ListBoxItem>        
      </ListBox>

        <ListBox Width="50" Height="50" SelectionChanged="changeRow">
          <ListBoxItem>25</ListBoxItem>
          <ListBoxItem>50</ListBoxItem>
          <ListBoxItem>75</ListBoxItem>
          <ListBoxItem>100</ListBoxItem>
          <ListBoxItem>125</ListBoxItem>
          <ListBoxItem>150</ListBoxItem>
        </ListBox>      
        <Button Name="btn1" Click="setMinWidth">Set MinWidth="100"</Button>
        <Button Name="btn2" Click="setMaxWidth">Set MaxWidth="125"</Button>
        <Button Name="btn3" Click="setMinHeight">Set MinHeight="50"</Button>
        <Button Name="btn4" Click="setMaxHeight">Set MaxHeight="75"</Button> 
    </StackPanel>
</Window>
//File:Window.xaml.vb

Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Documents

Namespace GridLengthConverter_grid
  Public Partial Class Window1
    Inherits Window

    Public Sub changeRowVal(sender As Object, e As RoutedEventArgs)
      txt2.Text = "Current Grid Row is " + hs2.Value.ToString()
    End Sub

    Public Sub changeColVal(sender As Object, e As RoutedEventArgs)
      txt1.Text = "Current Grid Column is " + hs1.Value.ToString()
    End Sub

    Public Sub changeCol(sender As Object, args As SelectionChangedEventArgs)
      Dim li As ListBoxItem = TryCast(TryCast(sender, ListBox).SelectedItem, ListBoxItem)
      Dim myGridLengthConverter As New GridLengthConverter()
      If hs1.Value = 0 Then
        Dim gl1 As GridLength = CType(myGridLengthConverter.ConvertFromString(li.Content.ToString()), GridLength)
        col1.Width = gl1
      ElseIf hs1.Value = 1 Then
        Dim gl2 As GridLength = CType(myGridLengthConverter.ConvertFromString(li.Content.ToString()), GridLength)
        col2.Width = gl2
      ElseIf hs1.Value = 2 Then
        Dim gl3 As GridLength = CType(myGridLengthConverter.ConvertFromString(li.Content.ToString()), GridLength)
        col3.Width = gl3
      End If
    End Sub
    Public Sub changeRow(sender As Object, args As SelectionChangedEventArgs)
      Dim li2 As ListBoxItem = TryCast(TryCast(sender, ListBox).SelectedItem, ListBoxItem)
      Dim myGridLengthConverter2 As New GridLengthConverter()

      If hs2.Value = 0 Then
        Dim gl4 As GridLength = CType(myGridLengthConverter2.ConvertFromString(li2.Content.ToString()), GridLength)
        row1.Height = gl4
      ElseIf hs2.Value = 1 Then
        Dim gl5 As GridLength = CType(myGridLengthConverter2.ConvertFromString(li2.Content.ToString()), GridLength)
        row2.Height = gl5
      ElseIf hs2.Value = 2 Then
        Dim gl6 As GridLength = CType(myGridLengthConverter2.ConvertFromString(li2.Content.ToString()), GridLength)
        row3.Height = gl6
      End If

    End Sub

    Public Sub setMinWidth(sender As Object, e As RoutedEventArgs)
      col1.MinWidth = 100
      col2.MinWidth = 100
      col3.MinWidth = 100
    End Sub
    Public Sub setMaxWidth(sender As Object, e As RoutedEventArgs)
      col1.MaxWidth = 125
      col2.MaxWidth = 125
      col3.MaxWidth = 125
    End Sub
    Public Sub setMinHeight(sender As Object, e As RoutedEventArgs)
      row1.MinHeight = 50
      row2.MinHeight = 50
      row3.MinHeight = 50
    End Sub
    Public Sub setMaxHeight(sender As Object, e As RoutedEventArgs)
      row1.MaxHeight = 75
      row2.MaxHeight = 75
      row3.MaxHeight = 75
    End Sub

  End Class
End Namespace

Related examples in the same category

1.	External ListBox style
2.	Define ListBox template
3.	Set selected index for ListBox
4.	Bind String Array Resource to ListBox
5.	ListBox Selected Index, Item, Value
6.	ListBox and SelectionMode
7.	ListView using GridView.HeaderTemplate and GridViewColumn.CellTemplate properties
8.	Load the Items in a ListBox Asynchronously
9.	Change the Appearance of Alternate Items in a List
10.	Change the Appearance of a List Item When It's Selected
11.	Use Data Templates to Display Bound Data
12.	CheckBox List
13.	Use the FontSizeConverter class to convert the content of a ListBoxItem to a value that represents the size of a font.
14.	ListBox SelectionChanged Event
15.	ListBox SelectionMode=Single
16.	Get Selected Item from ListBox
17.	ListBox selection changed event
18.	Different Font Family and Size for each ListBoxItem
19.	Handles ListBoxItem Selected events for the ListBoxItems in the inner ListBox.
20.	Use Panel as a ListBoxItem
21.	Create a ListBoxItem, set font, content, add the ListBoxItem to the ListBox
22.	Select All ListBox Items
23.	Create a style that will produce a horizontal ListBox.
24.	Convert contents of a ListBoxItem to an instance of Thickness by using the ThicknessConverter
25.	DataTrigger, ListBox and user object
26.	Add selected file to ListBox
27.	ListBox with Image item
28.	Get selecte item from ListBox
29.	List box with text and non-text content in the list box items.
30.	This list box allows multiple user selections.
31.	List box that uses data binding to populate the list box items.
32.	This list box allows items to be selected in groups by using the SHIFT key and mouse or the CTRL key and space key.
33.	Get selected item count from Listbox
34.	Change Height
35.	Change MinHeight
36.	View and Select Items Using a List
37.	Set text to TextBlock for selected list item
38.	Iterate through the selected items and remove each one
39.	Ensure there is at least one item selected
40.	Select All and unselect all
41.	Get Item At Index Position [0]

Convert the contents of a ListBoxItem to an instance of GridLength by using GridLengthConverter : ListBox « Windows Presentation Foundation « VB.Net

Related examples in the same category