diff --git a/Patterns/Modules/Controls.vb b/Patterns/Modules/Controls.vb
index 85483913..63b90bff 100644
--- a/Patterns/Modules/Controls.vb
+++ b/Patterns/Modules/Controls.vb
@@ -51,14 +51,14 @@ Namespace Modules
                                 ' Dim oDateValue As Date = oDateEdit.EditValue
                                 ' oReplaceValue = oDateValue.ToString("yyyyMMdd")
 
-                            Case GetType(DevExpress.XtraEditors.LookUpEdit)
-                                Dim oLookupEdit As DevExpress.XtraEditors.LookUpEdit = oControl
+                            ' Case GetType(DevExpress.XtraEditors.LookUpEdit) ' Type not found: DevExpress.XtraEditors.LookUpEdit
+                                ' Dim oLookupEdit As DevExpress.XtraEditors.LookUpEdit = oControl
 
-                                If IsNothing(oLookupEdit.EditValue) Then
-                                    oReplaceValue = String.Empty
-                                Else
-                                    oReplaceValue = oLookupEdit.EditValue
-                                End If
+                                ' If IsNothing(oLookupEdit.EditValue) Then
+                                    ' oReplaceValue = String.Empty
+                                ' Else
+                                    ' oReplaceValue = oLookupEdit.EditValue
+                                ' End If
 
                             Case GetType(LookupControl3)
                                 Dim oLookupControl3 As LookupControl3 = oControl