Patterns: Replace with empty string for lookup edits when editvalid is nothing
This commit is contained in:
@@ -52,7 +52,12 @@ Namespace Modules
|
|||||||
|
|
||||||
Case GetType(DevExpress.XtraEditors.LookUpEdit)
|
Case GetType(DevExpress.XtraEditors.LookUpEdit)
|
||||||
Dim oLookupEdit As DevExpress.XtraEditors.LookUpEdit = oControl
|
Dim oLookupEdit As DevExpress.XtraEditors.LookUpEdit = oControl
|
||||||
oReplaceValue = oLookupEdit.EditValue
|
|
||||||
|
If IsNothing(oLookupEdit.EditValue) Then
|
||||||
|
oReplaceValue = String.Empty
|
||||||
|
Else
|
||||||
|
oReplaceValue = oLookupEdit.EditValue
|
||||||
|
End If
|
||||||
|
|
||||||
Case GetType(LookupControl3)
|
Case GetType(LookupControl3)
|
||||||
Dim oLookupControl3 As LookupControl3 = oControl
|
Dim oLookupControl3 As LookupControl3 = oControl
|
||||||
|
|||||||
Reference in New Issue
Block a user