diff --git a/Patterns/Modules/Controls.vb b/Patterns/Modules/Controls.vb index cb432797..d39ea976 100644 --- a/Patterns/Modules/Controls.vb +++ b/Patterns/Modules/Controls.vb @@ -71,9 +71,9 @@ Namespace Modules Case GetType(ComboBox) oReplaceValue = oControl.Text - Case GetType(DevExpress.XtraEditors.ComboBoxEdit) - Dim oCombobox As DevExpress.XtraEditors.ComboBoxEdit = oControl - oReplaceValue = oCombobox.EditValue + ' Case GetType(DevExpress.XtraEditors.ComboBoxEdit) ' Type not found: DevExpress.XtraEditors.ComboBoxEdit + ' Dim oCombobox As DevExpress.XtraEditors.ComboBoxEdit = oControl + ' oReplaceValue = oCombobox.EditValue Case GetType(CheckBox) Dim oCheckBox As CheckBox = oControl