diff --git a/.github/workflows/vale.yml b/.github/workflows/vale.yml
new file mode 100644
index 0000000..fc11f81
--- /dev/null
+++ b/.github/workflows/vale.yml
@@ -0,0 +1,30 @@
+name: vale-validation
+on:
+  pull_request:
+    paths:
+    - README.md
+    - readme.md
+    - Readme.md
+
+jobs:
+  vale:
+    name: runner / vale
+    runs-on: ubuntu-latest
+    steps:
+      - name: clone repo
+        uses: actions/checkout@v4
+      - name: clone vale-styles repo
+        uses: actions/checkout@v4
+        with:
+          repository: DevExpress/vale-styles
+          path: vale-styles
+          ssh-key: ${{ secrets.VALE_STYLES_ACCESS_KEY }}
+      - name: copy vale rules to the root repo
+        run: shopt -s dotglob && cp -r ./vale-styles/vale/* .
+      - name: vale linter check
+        uses: DevExpress/vale-action@reviewdog
+        with:
+          files: '["README.md", "readme.md", "Readme.md"]'
+          fail_on_error: true
+          filter_mode: nofilter
+          reporter: github-check
diff --git a/Readme.md b/Readme.md
index 8bd9dfb..832029f 100644
--- a/Readme.md
+++ b/Readme.md
@@ -2,6 +2,7 @@
 ![](https://img.shields.io/endpoint?url=https://codecentral.devexpress.com/api/v1/VersionRange/128650903/11.1.4%2B)
 [![](https://img.shields.io/badge/Open_in_DevExpress_Support_Center-FF7200?style=flat-square&logo=DevExpress&logoColor=white)](https://supportcenter.devexpress.com/ticket/details/E3191)
 [![](https://img.shields.io/badge/📖_How_to_use_DevExpress_Examples-e9f6fc?style=flat-square)](https://docs.devexpress.com/GeneralInformation/403183)
+[![](https://img.shields.io/badge/💬_Leave_Feedback-feecdd?style=flat-square)](#does-this-example-address-your-development-requirementsobjectives)
 <!-- default badges end -->
 <!-- default file list -->
 *Files to look at*:
@@ -18,3 +19,10 @@
 <br/>
 
 
+<!-- feedback -->
+## Does this example address your development requirements/objectives?
+
+[<img src="https://www.devexpress.com/support/examples/i/yes-button.svg"/>](https://www.devexpress.com/support/examples/survey.xml?utm_source=github&utm_campaign=wpf-data-grid-implement-attribute-based-validation&~~~was_helpful=yes) [<img src="https://www.devexpress.com/support/examples/i/no-button.svg"/>](https://www.devexpress.com/support/examples/survey.xml?utm_source=github&utm_campaign=wpf-data-grid-implement-attribute-based-validation&~~~was_helpful=no)
+
+(you will be redirected to DevExpress.com to submit your response)
+<!-- feedback end -->
diff --git a/VB/DXGrid_AttributesBasedValidation/Application.xaml b/VB/DXGrid_AttributesBasedValidation/App.xaml
similarity index 100%
rename from VB/DXGrid_AttributesBasedValidation/Application.xaml
rename to VB/DXGrid_AttributesBasedValidation/App.xaml
diff --git a/VB/DXGrid_AttributesBasedValidation/Application.xaml.vb b/VB/DXGrid_AttributesBasedValidation/App.xaml.vb
similarity index 57%
rename from VB/DXGrid_AttributesBasedValidation/Application.xaml.vb
rename to VB/DXGrid_AttributesBasedValidation/App.xaml.vb
index 2d79ea5..5d41104 100644
--- a/VB/DXGrid_AttributesBasedValidation/Application.xaml.vb
+++ b/VB/DXGrid_AttributesBasedValidation/App.xaml.vb
@@ -1,15 +1,11 @@
-Imports System
-Imports System.Collections.Generic
-Imports System.Configuration
-Imports System.Data
-Imports System.Linq
 Imports System.Windows
 
 Namespace DXGrid_AttributesBasedValidation
+
     ''' <summary>
     ''' Interaction logic for App.xaml
     ''' </summary>
-    Partial Public Class App
+    Public Partial Class App
         Inherits Application
 
     End Class
diff --git a/VB/DXGrid_AttributesBasedValidation/DXGrid_AttributesBasedValidation.vbproj b/VB/DXGrid_AttributesBasedValidation/DXGrid_AttributesBasedValidation.vbproj
index a27ade7..8032941 100644
--- a/VB/DXGrid_AttributesBasedValidation/DXGrid_AttributesBasedValidation.vbproj
+++ b/VB/DXGrid_AttributesBasedValidation/DXGrid_AttributesBasedValidation.vbproj
@@ -1,22 +1,22 @@
 <?xml version="1.0" encoding="utf-8"?>
 <Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
   <PropertyGroup>
+    <OptionInfer>On</OptionInfer>
     <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
     <Platform Condition=" '$(Platform)' == '' ">x86</Platform>
     <ProductVersion>8.0.30703</ProductVersion>
     <SchemaVersion>2.0</SchemaVersion>
     <ProjectGuid>{1397FBB1-3C84-4C6C-875A-82A005901863}</ProjectGuid>
     <OutputType>WinExe</OutputType>
-    <RootNamespace></RootNamespace>
+    <AppDesignerFolder>Properties</AppDesignerFolder>
+    <RootNamespace>
+    </RootNamespace>
     <AssemblyName>DXGrid_AttributesBasedValidation</AssemblyName>
     <TargetFrameworkVersion>v4.0</TargetFrameworkVersion>
     <TargetFrameworkProfile>Client</TargetFrameworkProfile>
     <FileAlignment>512</FileAlignment>
     <ProjectTypeGuids>{60dc8134-eba5-43b8-bcc9-bb4bc16c2548};{F184B08F-C81C-45F6-A57F-5ABD9991F28F}</ProjectTypeGuids>
-    <OptionExplicit>On</OptionExplicit>
-    <OptionCompare>Binary</OptionCompare>
-    <OptionStrict>Off</OptionStrict>
-    <OptionInfer>On</OptionInfer>
+    <WarningLevel>4</WarningLevel>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|x86' ">
     <PlatformTarget>x86</PlatformTarget>
@@ -24,18 +24,18 @@
     <DebugType>full</DebugType>
     <Optimize>false</Optimize>
     <OutputPath>bin\Debug\</OutputPath>
-    <DefineDebug>true</DefineDebug>
-    <DefineTrace>true</DefineTrace>
+    <DefineConstants>DEBUG,TRACE</DefineConstants>
     <ErrorReport>prompt</ErrorReport>
+    <WarningLevel>4</WarningLevel>
   </PropertyGroup>
   <PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|x86' ">
     <PlatformTarget>x86</PlatformTarget>
     <DebugType>pdbonly</DebugType>
     <Optimize>true</Optimize>
     <OutputPath>bin\Release\</OutputPath>
-    <DefineDebug>false</DefineDebug>
-    <DefineTrace>true</DefineTrace>
+    <DefineConstants>TRACE</DefineConstants>
     <ErrorReport>prompt</ErrorReport>
+    <WarningLevel>4</WarningLevel>
   </PropertyGroup>
   <ItemGroup>
     <Reference Include="DevExpress.Data.v13.1, Version=13.1.14.0, Culture=neutral, PublicKeyToken=b88d1754d700e49a, processorArchitecture=MSIL">
@@ -75,27 +75,7 @@
     <Reference Include="PresentationFramework" />
   </ItemGroup>
   <ItemGroup>
-    <Import Include="Microsoft.VisualBasic" />
-    <Import Include="System.Collections.Generic" />
-    <Import Include="System.Collections" />
-    <Import Include="System.Diagnostics" />
-    <Import Include="System.Linq" />
-    <Import Include="System.Xml.Linq" />
-    <Import Include="System.Data" />
-    <Import Include="System.Drawing" />
-    <Import Include="System.Windows.Controls" />
-    <Import Include="System.Windows.Data" />
-    <Import Include="System.Windows.Shapes" />
-    <Import Include="System.Windows.Documents" />
-    <Import Include="System.Windows.Input" />
-    <Import Include="System.Windows.Media.Imaging" />
-    <Import Include="System.Windows.Media" />
-    <Import Include="System.Windows.Navigation" />
-    <Import Include="System.Windows" />
-    <Import Include="System" />
-  </ItemGroup>
-  <ItemGroup>
-    <ApplicationDefinition Include="Application.xaml">
+    <ApplicationDefinition Include="App.xaml">
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>
     </ApplicationDefinition>
@@ -103,8 +83,8 @@
       <Generator>MSBuild:Compile</Generator>
       <SubType>Designer</SubType>
     </Page>
-    <Compile Include="Application.xaml.vb">
-      <DependentUpon>Application.xaml</DependentUpon>
+    <Compile Include="App.xaml.vb">
+      <DependentUpon>App.xaml</DependentUpon>
       <SubType>Code</SubType>
     </Compile>
     <Compile Include="Employees.vb" />
@@ -114,32 +94,32 @@
     </Compile>
   </ItemGroup>
   <ItemGroup>
-    <Compile Include="My Project\AssemblyInfo.vb">
+    <Compile Include="Properties\AssemblyInfo.vb">
       <SubType>Code</SubType>
     </Compile>
-    <Compile Include="My Project\Resources.Designer.vb">
+    <Compile Include="Properties\Resources.Designer.vb">
       <AutoGen>True</AutoGen>
       <DesignTime>True</DesignTime>
       <DependentUpon>Resources.resx</DependentUpon>
     </Compile>
-    <Compile Include="My Project\Settings.Designer.vb">
+    <Compile Include="Properties\Settings.Designer.vb">
       <AutoGen>True</AutoGen>
       <DependentUpon>Settings.settings</DependentUpon>
       <DesignTimeSharedInput>True</DesignTimeSharedInput>
     </Compile>
-    <EmbeddedResource Include="My Project\Resources.resx">
-      <Generator>VbMyResourcesResXFileCodeGenerator</Generator>
+    <EmbeddedResource Include="Properties\Resources.resx">
+      <Generator>ResXFileCodeGenerator</Generator>
       <LastGenOutput>Resources.Designer.vb</LastGenOutput>
-      <CustomToolNamespace>My.Resources</CustomToolNamespace>
+      <CustomToolNamespace>DXGrid_AttributesBasedValidation.Properties</CustomToolNamespace>
     </EmbeddedResource>
-    <None Include="My Project\Settings.settings">
+    <None Include="Properties\Settings.settings">
       <Generator>SettingsSingleFileGenerator</Generator>
       <LastGenOutput>Settings.Designer.vb</LastGenOutput>
     </None>
-    <AppDesigner Include="My Project\" />
+    <AppDesigner Include="Properties\" />
   </ItemGroup>
   <Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
-  <!-- To modify your build process, add your task inside one of the targets below and uncomment it.
+  <!-- To modify your build process, add your task inside one of the targets below and uncomment it. 
        Other similar extension points exist, see Microsoft.Common.targets.
   <Target Name="BeforeBuild">
   </Target>
diff --git a/VB/DXGrid_AttributesBasedValidation/Employees.vb b/VB/DXGrid_AttributesBasedValidation/Employees.vb
index fc6cd6c..5030a5f 100644
--- a/VB/DXGrid_AttributesBasedValidation/Employees.vb
+++ b/VB/DXGrid_AttributesBasedValidation/Employees.vb
@@ -1,48 +1,44 @@
-Imports System
 Imports System.Collections.Generic
 Imports System.ComponentModel.DataAnnotations
 
 Public Class Employee
-    Public Property ID() As Integer
-    Public Property ParentID() As Integer
-    <Required(AllowEmptyStrings := False, ErrorMessage := "The Name cannot be empty. Please correct.")> _
-    Public Property Name() As String
-    <StringLength(20)> _
-    Public Property Position() As String
-    <Required(AllowEmptyStrings := False, ErrorMessage := "The Department cannot be empty. Please correct.")> _
-    Public Property Department() As String
-End Class
-
-Public NotInheritable Class Stuff
-
-    Private Sub New()
-    End Sub
 
-    Public Shared Function GetStuff() As List(Of Employee)
+    Public Property ID As Integer
 
-        Dim stuff_Renamed As New List(Of Employee)()
-        stuff_Renamed.Add(New Employee() With {.ID = 1, .ParentID = 0, .Name = "Gregory S. Price", .Department = "", .Position = "President"})
-        stuff_Renamed.Add(New Employee() With {.ID = 2, .ParentID = 1, .Name = String.Empty, .Department = "Marketing", .Position = "Vice President"})
-        stuff_Renamed.Add(New Employee() With {.ID = 3, .ParentID = 1, .Name = "John C. Powell", .Department = "Operations", .Position = "Vice President"})
-        stuff_Renamed.Add(New Employee() With {.ID = 4, .ParentID = 1, .Name = "Christian P. Laclair", .Department = "Production", .Position = "Vice President"})
-        stuff_Renamed.Add(New Employee() With {.ID = 5, .ParentID = 1, .Name = String.Empty, .Department = "Finance", .Position = "Vice President"})
+    Public Property ParentID As Integer
 
-        stuff_Renamed.Add(New Employee() With {.ID = 6, .ParentID = 2, .Name = "Brian C. Cowling", .Department = "Marketing", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 7, .ParentID = 2, .Name = "Thomas C. Dawson", .Department = "Marketing", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 8, .ParentID = 2, .Name = "", .Department = "Marketing", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 9, .ParentID = 2, .Name = "", .Department = "Marketing", .Position = "Manager"})
+    <Required(AllowEmptyStrings:=False, ErrorMessage:="The Name cannot be empty. Please correct.")>
+    Public Property Name As String
 
-        stuff_Renamed.Add(New Employee() With {.ID = 10, .ParentID = 3, .Name = "Harold S. Brandes", .Department = "Operations", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 11, .ParentID = 3, .Name = "Michael S. Blevins", .Department = "Operations", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 12, .ParentID = 3, .Name = "Jan K. Sisk", .Department = "Operations", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 13, .ParentID = 3, .Name = "Sidney L. Holder", .Department = "Operations", .Position = "Manager"})
+    <StringLength(20)>
+    Public Property Position As String
 
-        stuff_Renamed.Add(New Employee() With {.ID = 14, .ParentID = 4, .Name = "James L. Kelsey", .Department = "Production", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 15, .ParentID = 4, .Name = "Howard M. Carpenter", .Department = "Production", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 16, .ParentID = 4, .Name = "Jennifer T. Tapia", .Department = "Production", .Position = "Manager"})
+    <Required(AllowEmptyStrings:=False, ErrorMessage:="The Department cannot be empty. Please correct.")>
+    Public Property Department As String
+End Class
 
-        stuff_Renamed.Add(New Employee() With {.ID = 17, .ParentID = 5, .Name = "Judith P. Underhill", .Department = "Finance", .Position = "Manager"})
-        stuff_Renamed.Add(New Employee() With {.ID = 18, .ParentID = 5, .Name = "Russell E. Belton", .Department = "Finance", .Position = "Manager"})
-        Return stuff_Renamed
+Public Module Stuff
+
+    Public Function GetStuff() As List(Of Employee)
+        Dim stuff As List(Of Employee) = New List(Of Employee)()
+        stuff.Add(New Employee() With {.ID = 1, .ParentID = 0, .Name = "Gregory S. Price", .Department = "", .Position = "President"})
+        stuff.Add(New Employee() With {.ID = 2, .ParentID = 1, .Name = String.Empty, .Department = "Marketing", .Position = "Vice President"})
+        stuff.Add(New Employee() With {.ID = 3, .ParentID = 1, .Name = "John C. Powell", .Department = "Operations", .Position = "Vice President"})
+        stuff.Add(New Employee() With {.ID = 4, .ParentID = 1, .Name = "Christian P. Laclair", .Department = "Production", .Position = "Vice President"})
+        stuff.Add(New Employee() With {.ID = 5, .ParentID = 1, .Name = String.Empty, .Department = "Finance", .Position = "Vice President"})
+        stuff.Add(New Employee() With {.ID = 6, .ParentID = 2, .Name = "Brian C. Cowling", .Department = "Marketing", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 7, .ParentID = 2, .Name = "Thomas C. Dawson", .Department = "Marketing", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 8, .ParentID = 2, .Name = "", .Department = "Marketing", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 9, .ParentID = 2, .Name = "", .Department = "Marketing", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 10, .ParentID = 3, .Name = "Harold S. Brandes", .Department = "Operations", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 11, .ParentID = 3, .Name = "Michael S. Blevins", .Department = "Operations", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 12, .ParentID = 3, .Name = "Jan K. Sisk", .Department = "Operations", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 13, .ParentID = 3, .Name = "Sidney L. Holder", .Department = "Operations", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 14, .ParentID = 4, .Name = "James L. Kelsey", .Department = "Production", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 15, .ParentID = 4, .Name = "Howard M. Carpenter", .Department = "Production", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 16, .ParentID = 4, .Name = "Jennifer T. Tapia", .Department = "Production", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 17, .ParentID = 5, .Name = "Judith P. Underhill", .Department = "Finance", .Position = "Manager"})
+        stuff.Add(New Employee() With {.ID = 18, .ParentID = 5, .Name = "Russell E. Belton", .Department = "Finance", .Position = "Manager"})
+        Return stuff
     End Function
-End Class
+End Module
diff --git a/VB/DXGrid_AttributesBasedValidation/MainWindow.xaml.vb b/VB/DXGrid_AttributesBasedValidation/MainWindow.xaml.vb
index ff77185..9f92a4f 100644
--- a/VB/DXGrid_AttributesBasedValidation/MainWindow.xaml.vb
+++ b/VB/DXGrid_AttributesBasedValidation/MainWindow.xaml.vb
@@ -1,27 +1,17 @@
-Imports System
-Imports System.Collections.Generic
-Imports System.Linq
-Imports System.Text
 Imports System.Windows
 Imports System.Windows.Controls
-Imports System.Windows.Data
-Imports System.Windows.Documents
-Imports System.Windows.Input
-Imports System.Windows.Media
-Imports System.Windows.Media.Imaging
-Imports System.Windows.Navigation
-Imports System.Windows.Shapes
 
 Namespace DXGrid_AttributesBasedValidation
+
     ''' <summary>
     ''' Interaction logic for MainWindow.xaml
     ''' </summary>
-    Partial Public Class MainWindow
+    Public Partial Class MainWindow
         Inherits Window
 
         Public Sub New()
-            InitializeComponent()
-            grid.ItemsSource = Stuff.GetStuff()
+            Me.InitializeComponent()
+            Me.grid.ItemsSource = GetStuff()
         End Sub
     End Class
 End Namespace
diff --git a/VB/DXGrid_AttributesBasedValidation/My Project/Resources.Designer.vb b/VB/DXGrid_AttributesBasedValidation/My Project/Resources.Designer.vb
deleted file mode 100644
index 9522e21..0000000
--- a/VB/DXGrid_AttributesBasedValidation/My Project/Resources.Designer.vb	
+++ /dev/null
@@ -1,61 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.225
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Namespace My.Resources
-
-
-    ''' <summary>
-    '''   A strongly-typed resource class, for looking up localized strings, etc.
-    ''' </summary>
-    ' This class was auto-generated by the StronglyTypedResourceBuilder
-    ' class via a tool like ResGen or Visual Studio.
-    ' To add or remove a member, edit your .ResX file then rerun ResGen
-    ' with the /str option, or rebuild your VS project.
-    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
-    Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
-    Friend Module Resources
-
-        Private resourceMan As Global.System.Resources.ResourceManager
-
-        Private resourceCulture As Global.System.Globalization.CultureInfo
-
-'        internal Resources()
-'        {
-'        }
-
-        ''' <summary>
-        '''   Returns the cached ResourceManager instance used by this class.
-        ''' </summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-        Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
-            Get
-                If (resourceMan Is Nothing) Then
-                    Dim temp As New Global.System.Resources.ResourceManager("Resources", GetType(Resources).Assembly)
-                    resourceMan = temp
-                End If
-                Return resourceMan
-            End Get
-        End Property
-
-        ''' <summary>
-        '''   Overrides the current thread's CurrentUICulture property for all
-        '''   resource lookups using this strongly typed resource class.
-        ''' </summary>
-        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
-        Friend Property Culture() As Global.System.Globalization.CultureInfo
-            Get
-                Return resourceCulture
-            End Get
-            Set(ByVal value As System.Globalization.CultureInfo)
-                resourceCulture = value
-            End Set
-        End Property
-    End Module
-End Namespace
diff --git a/VB/DXGrid_AttributesBasedValidation/My Project/Settings.Designer.vb b/VB/DXGrid_AttributesBasedValidation/My Project/Settings.Designer.vb
deleted file mode 100644
index f5164c6..0000000
--- a/VB/DXGrid_AttributesBasedValidation/My Project/Settings.Designer.vb	
+++ /dev/null
@@ -1,26 +0,0 @@
-'------------------------------------------------------------------------------
-' <auto-generated>
-'     This code was generated by a tool.
-'     Runtime Version:4.0.30319.225
-'
-'     Changes to this file may cause incorrect behavior and will be lost if
-'     the code is regenerated.
-' </auto-generated>
-'------------------------------------------------------------------------------
-
-Namespace My
-
-
-    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0")> _
-    Friend NotInheritable Partial Class Settings
-        Inherits System.Configuration.ApplicationSettingsBase
-
-        Private Shared defaultInstance As Settings = (CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New Settings()), Settings))
-
-        Public Shared ReadOnly Property [Default]() As Settings
-            Get
-                Return defaultInstance
-            End Get
-        End Property
-    End Class
-End Namespace
diff --git a/VB/DXGrid_AttributesBasedValidation/My Project/AssemblyInfo.vb b/VB/DXGrid_AttributesBasedValidation/Properties/AssemblyInfo.vb
similarity index 56%
rename from VB/DXGrid_AttributesBasedValidation/My Project/AssemblyInfo.vb
rename to VB/DXGrid_AttributesBasedValidation/Properties/AssemblyInfo.vb
index 4682d5e..a08cbe3 100644
--- a/VB/DXGrid_AttributesBasedValidation/My Project/AssemblyInfo.vb	
+++ b/VB/DXGrid_AttributesBasedValidation/Properties/AssemblyInfo.vb
@@ -1,43 +1,35 @@
-Imports System.Reflection
-Imports System.Resources
-Imports System.Runtime.CompilerServices
+Imports System.Reflection
 Imports System.Runtime.InteropServices
 Imports System.Windows
 
 ' General Information about an assembly is controlled through the following 
 ' set of attributes. Change these attribute values to modify the information
 ' associated with an assembly.
-<Assembly: AssemblyTitle("DXGrid_AttributesBasedValidation")>
-<Assembly: AssemblyDescription("")>
-<Assembly: AssemblyConfiguration("")>
-<Assembly: AssemblyCompany("")>
-<Assembly: AssemblyProduct("DXGrid_AttributesBasedValidation")>
-<Assembly: AssemblyCopyright("Copyright ©  2011")>
-<Assembly: AssemblyTrademark("")>
-<Assembly: AssemblyCulture("")>
-
+<Assembly:AssemblyTitle("DXGrid_AttributesBasedValidation")>
+<Assembly:AssemblyDescription("")>
+<Assembly:AssemblyConfiguration("")>
+<Assembly:AssemblyCompany("")>
+<Assembly:AssemblyProduct("DXGrid_AttributesBasedValidation")>
+<Assembly:AssemblyCopyright("Copyright ©  2011")>
+<Assembly:AssemblyTrademark("")>
+<Assembly:AssemblyCulture("")>
 ' Setting ComVisible to false makes the types in this assembly not visible 
 ' to COM components.  If you need to access a type in this assembly from 
 ' COM, set the ComVisible attribute to true on that type.
-<Assembly: ComVisible(False)>
-
+<Assembly:ComVisible(False)>
 'In order to begin building localizable applications, set 
 '<UICulture>CultureYouAreCodingWith</UICulture> in your .csproj file
 'inside a <PropertyGroup>.  For example, if you are using US english
 'in your source files, set the <UICulture> to en-US.  Then uncomment
 'the NeutralResourceLanguage attribute below.  Update the "en-US" in
 'the line below to match the UICulture setting in the project file.
-
 '[assembly: NeutralResourcesLanguage("en-US", UltimateResourceFallbackLocation.Satellite)]
-
-
-<Assembly: ThemeInfo(ResourceDictionaryLocation.None, ResourceDictionaryLocation.SourceAssembly)> 'where the generic resource dictionary is located - where theme specific resource dictionaries are located
-    '(used if a resource is not found in the page, 
-    ' or application resource dictionaries)
-    '(used if a resource is not found in the page, 
-    ' app, or any theme specific resource dictionaries)
-
-
+'(used if a resource is not found in the page, 
+' or application resource dictionaries)
+'(used if a resource is not found in the page, 
+' app, or any theme specific resource dictionaries)
+<Assembly:ThemeInfo(ResourceDictionaryLocation.None, ResourceDictionaryLocation.SourceAssembly)> 'where theme specific resource dictionaries are located
+'where the generic resource dictionary is located
 ' Version information for an assembly consists of the following four values:
 '
 '      Major Version
@@ -48,5 +40,5 @@ Imports System.Windows
 ' You can specify all the values or you can default the Build and Revision Numbers 
 ' by using the '*' as shown below:
 ' [assembly: AssemblyVersion("1.0.*")]
-<Assembly: AssemblyVersion("1.0.0.0")>
-<Assembly: AssemblyFileVersion("1.0.0.0")>
+<Assembly:AssemblyVersion("1.0.0.0")>
+<Assembly:AssemblyFileVersion("1.0.0.0")>
diff --git a/VB/DXGrid_AttributesBasedValidation/Properties/Resources.Designer.vb b/VB/DXGrid_AttributesBasedValidation/Properties/Resources.Designer.vb
new file mode 100644
index 0000000..28c11d3
--- /dev/null
+++ b/VB/DXGrid_AttributesBasedValidation/Properties/Resources.Designer.vb
@@ -0,0 +1,62 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.225
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+Namespace DXGrid_AttributesBasedValidation.Properties
+
+    ''' <summary>
+    '''   A strongly-typed resource class, for looking up localized strings, etc.
+    ''' </summary>
+    ' This class was auto-generated by the StronglyTypedResourceBuilder
+    ' class via a tool like ResGen or Visual Studio.
+    ' To add or remove a member, edit your .ResX file then rerun ResGen
+    ' with the /str option, or rebuild your VS project.
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0")>
+    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>
+    Friend Class Resources
+
+        Private Shared resourceMan As Global.System.Resources.ResourceManager
+
+        Private Shared resourceCulture As Global.System.Globalization.CultureInfo
+
+        <Global.System.Diagnostics.CodeAnalysis.SuppressMessageAttribute("Microsoft.Performance", "CA1811:AvoidUncalledPrivateCode")>
+        Friend Sub New()
+        End Sub
+
+        ''' <summary>
+        '''   Returns the cached ResourceManager instance used by this class.
+        ''' </summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>
+        Friend Shared ReadOnly Property ResourceManager As Global.System.Resources.ResourceManager
+            Get
+                If(DXGrid_AttributesBasedValidation.Properties.Resources.resourceMan Is Nothing) Then
+                    Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("Resources", GetType(DXGrid_AttributesBasedValidation.Properties.Resources).Assembly)
+                    DXGrid_AttributesBasedValidation.Properties.Resources.resourceMan = temp
+                End If
+
+                Return DXGrid_AttributesBasedValidation.Properties.Resources.resourceMan
+            End Get
+        End Property
+
+        ''' <summary>
+        '''   Overrides the current thread's CurrentUICulture property for all
+        '''   resource lookups using this strongly typed resource class.
+        ''' </summary>
+        <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)>
+        Friend Shared Property Culture As Global.System.Globalization.CultureInfo
+            Get
+                Return DXGrid_AttributesBasedValidation.Properties.Resources.resourceCulture
+            End Get
+
+            Set(ByVal value As Global.System.Globalization.CultureInfo)
+                DXGrid_AttributesBasedValidation.Properties.Resources.resourceCulture = value
+            End Set
+        End Property
+    End Class
+End Namespace
diff --git a/VB/DXGrid_AttributesBasedValidation/My Project/Resources.resx b/VB/DXGrid_AttributesBasedValidation/Properties/Resources.resx
similarity index 100%
rename from VB/DXGrid_AttributesBasedValidation/My Project/Resources.resx
rename to VB/DXGrid_AttributesBasedValidation/Properties/Resources.resx
diff --git a/VB/DXGrid_AttributesBasedValidation/Properties/Settings.Designer.vb b/VB/DXGrid_AttributesBasedValidation/Properties/Settings.Designer.vb
new file mode 100644
index 0000000..244adc4
--- /dev/null
+++ b/VB/DXGrid_AttributesBasedValidation/Properties/Settings.Designer.vb
@@ -0,0 +1,25 @@
+'------------------------------------------------------------------------------
+' <auto-generated>
+'     This code was generated by a tool.
+'     Runtime Version:4.0.30319.225
+'
+'     Changes to this file may cause incorrect behavior and will be lost if
+'     the code is regenerated.
+' </auto-generated>
+'------------------------------------------------------------------------------
+Namespace DXGrid_AttributesBasedValidation.Properties
+
+    <Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()>
+    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "10.0.0.0")>
+    Friend NotInheritable Partial Class Settings
+        Inherits Global.System.Configuration.ApplicationSettingsBase
+
+        Private Shared defaultInstance As DXGrid_AttributesBasedValidation.Properties.Settings = CType((Global.System.Configuration.ApplicationSettingsBase.Synchronized(New DXGrid_AttributesBasedValidation.Properties.Settings())), DXGrid_AttributesBasedValidation.Properties.Settings)
+
+        Public Shared ReadOnly Property [Default] As Settings
+            Get
+                Return DXGrid_AttributesBasedValidation.Properties.Settings.defaultInstance
+            End Get
+        End Property
+    End Class
+End Namespace
diff --git a/VB/DXGrid_AttributesBasedValidation/My Project/Settings.settings b/VB/DXGrid_AttributesBasedValidation/Properties/Settings.settings
similarity index 100%
rename from VB/DXGrid_AttributesBasedValidation/My Project/Settings.settings
rename to VB/DXGrid_AttributesBasedValidation/Properties/Settings.settings