diff --git a/Patterns/Modules/Controls.vb b/Patterns/Modules/Controls.vb
index 2b1cfc3e..f366267b 100644
--- a/Patterns/Modules/Controls.vb
+++ b/Patterns/Modules/Controls.vb
@@ -46,10 +46,10 @@ Namespace Modules
                                 Dim oTextEdit As DevExpress.XtraEditors.TextEdit = oControl
                                 oReplaceValue = oTextEdit.EditValue
 
-                            Case GetType(DevExpress.XtraEditors.DateEdit)
-                                Dim oDateEdit As DevExpress.XtraEditors.DateEdit = oControl
-                                Dim oDateValue As Date = oDateEdit.EditValue
-                                oReplaceValue = oDateValue.ToString("yyyyMMdd")
+                            ' Case GetType(DevExpress.XtraEditors.DateEdit) ' Type not found: DevExpress.XtraEditors.DateEdit
+                                ' Dim oDateEdit As DevExpress.XtraEditors.DateEdit = oControl
+                                ' Dim oDateValue As Date = oDateEdit.EditValue
+                                ' oReplaceValue = oDateValue.ToString("yyyyMMdd")
 
                             Case GetType(DevExpress.XtraEditors.LookUpEdit)
                                 Dim oLookupEdit As DevExpress.XtraEditors.LookUpEdit = oControl