WPF VB.Net Tutorial

    xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
    Title="GridSplitter Example">

  
    
    
    
    
  

  
    
    
    
  

  
    Row 0 Col 0
  
  
    Row 1 Col 0
  
  
    Row 2 Col 1
  
  
    Row 0 Col 1
  
  
    Row 1 Col 1
  
  
   Row 2 Col 1
  
  
    Row 0 Col 2
  
  
    Row 1 Col 2
  
  
    Row 2 Col 2
  
   
  
  
    Property Settings
      
        KeyboardIncrement
        
        1 (default)
        
        
        20
        
        
        50
        
        
        100
        
      
  


//File:Window.xaml.vb
Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Documents
Imports System.Windows.Media
Imports System.Windows.Navigation
Imports System.Windows.Shapes
Namespace GridSplitter_Example
  Public Partial Class Window1
    Inherits Window
    Public Sub New()
      InitializeComponent()
    End Sub
    Private Sub KeyboardIncrementChanged(sender As Object, e As RoutedEventArgs)
      If CType(KeyboardIncrementAuto.IsChecked, [Boolean]) Then
        myGridSplitter.KeyboardIncrement = 1
      ElseIf CType(KeyboardIncrementCols.IsChecked, [Boolean]) Then
        myGridSplitter.KeyboardIncrement = 20
      ElseIf CType(KeyboardIncrementRows.IsChecked, [Boolean]) Then
        myGridSplitter.KeyboardIncrement = 50
      ElseIf CType(KeyboardIncrementBoth.IsChecked, [Boolean]) Then
        myGridSplitter.KeyboardIncrement = 100
      End If
    End Sub
  End Class
End Namespace