xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
x:Class="WpfApplication1.FEMarginProgrammatic">
Click To See Change!!
//File:Window.xaml.vb
Imports System
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Media
Namespace WpfApplication1
Public Partial Class FEMarginProgrammatic
Private Sub OnClick(sender As Object, e As RoutedEventArgs)
Dim marginThickness As Thickness = btn1.Margin
If marginThickness.Left = 10 Then
btn1.Margin = New Thickness(60)
Else
btn1.Margin = New Thickness(10)
End If
End Sub
End Class
End Namespace