WPF

<br />
 <Custom:DataGrid  VirtualizingStackPanel.IsVirtualizing="True" VirtualizingStackPanel.VirtualizationMode="Recycling" EnableRowVirtualization="True"   SelectionUnit="FullRow" RowBackground="Aqua" AlternatingRowBackground="Beige"   IsReadOnly="True"  SelectionMode="Extended" AutoGenerateColumns="False"   Background="White" FontWeight="Bold" FontFamily="Arial" FontSize="10.667" Height="Auto"  x:Name="dgChronicDiagnosis" HorizontalGridLinesBrush="{x:Null}" VerticalScrollBarVisibility="Auto"    MinHeight="0"  VerticalGridLinesBrush="{x:Null}" GridLinesVisibility="None" RowDetailsVisibilityMode="Collapsed"   BorderBrush="{x:Null}" ColumnHeaderStyle="{DynamicResource DataGridColumnHeaderStyle}" RowStyle="{DynamicResource DataGridRowStyle1}" BorderThickness="0"  Margin="0,4,0,0" VerticalAlignment="Center" VerticalContentAlignment="Stretch" IsSynchronizedWithCurrentItem="True" AreRowDetailsFrozen="True"><br />
                        <Custom:DataGrid.Columns><br />
<br />
											<br />
			<Custom:DataGridTemplateColumn  Header="OnSet" Width="10*"  CellStyle="{DynamicResource TempDataGridCellStyle}" ><br />
								<Custom:DataGridTemplateColumn.CellTemplate><br />
									<DataTemplate ><br />
										<TextBlock Text="{Binding ONSET}"    FontFamily="Arial" FontSize="10.667"/><br />
									</DataTemplate><br />
								</Custom:DataGridTemplateColumn.CellTemplate><br />
							</Custom:DataGridTemplateColumn><br />
							<br />
						</Custom:DataGrid.Columns><br />
					</Custom:DataGrid><br />

<TextBlock>
<TextBlock.Text>
<Binding ...>
<Binding.ValidationRules>
<localValidation:ValidateIt V1={Binding Path=...} V2={Binding Path=}/>
</Binding.ValidationRules/>
<TextBlock.Text/>
</TextBlock>

public class ValidateIt : ValidationRule
public int V1 {get;set;}
public int V2 {get;set;}

<Window x:Class="Window1"
   
xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation";
    xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml";
    Title="Window1" Height="300" Width="300">
    <Grid Name="Grid1">
        <Button Height="25" Width="50"
HorizontalAlignment="Right" VerticalAlignment="Bottom"
Name="Button1">Go</Button>
    </Grid>
</Window>



Imports System.Windows.Media.Animation

Class Window1

    Private LL As New Windows.Controls.Label

    Private Sub Window1_Loaded(ByVal sender As Object, ByVal
e As System.Windows.RoutedEventArgs) Handles Me.Loaded

        LL.Content = "dgkdjsjfklògjsòldfg"
        LL.Name = "Label1"
        LL.HorizontalAlignment Windows.HorizontalAlignment.Left
        LL.VerticalAlignment Windows.VerticalAlignment.Top
        LL.Foreground = Brushes.Black
        LL.Visibility = Windows.Visibility.Visible

        Me.Grid1.Children.Add(LL)

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object,
ByVal e As System.Windows.RoutedEventArgs) Handles
Button1.Click

        Dim sb As New Storyboard

        Dim myDoubleAnimation As New DoubleAnimation
        myDoubleAnimation.From = 0
        myDoubleAnimation.To = 100
        myDoubleAnimation.Duration TimeSpan.FromMilliseconds(2000)

        Storyboard.SetTargetName(myDoubleAnimation,
"Label1")
        Dim PropP As New PropertyPath(Canvas.LeftProperty)
        Storyboard.SetTargetProperty(myDoubleAnimation,
PropP)

        Dim myDoubleAnimation2 As New DoubleAnimation
        myDoubleAnimation2.From = 0
        myDoubleAnimation2.To = 100
        myDoubleAnimation2.Duration TimeSpan.FromMilliseconds(2000)

        Storyboard.SetTargetName(myDoubleAnimation2,
"Label1")
        Dim PropP2 As New PropertyPath(Canvas.TopProperty)
        Storyboard.SetTargetProperty(myDoubleAnimation2,
PropP2)

        sb.Children.Add(myDoubleAnimation)
        sb.Children.Add(myDoubleAnimation2)

        Me.BeginStoryboard(sb)

    End Sub

End Class

<CustomControl.Culture>
    <Culture Culture="Deutsch (Deutschland)">
        <Culture.Calendar>
            <my:GregorianCalendar />
        <Culture.Calendar>
    </Culture>
</CustomControl.Culture>

<CustomControl.Culture>
    <Culture Culture="Deutsch (Deutschland)" Calendar="Gregorian Localized">
    </Culture>
</CustomControl.Culture>