jj: Fix depending control

This commit is contained in:
Jonathan Jenne 2018-04-24 12:43:15 +02:00
parent 70e586b351
commit 8bdccb99a0

View File

@ -1082,10 +1082,11 @@ Public Class frmValidator
If LogErrorsOnly = False Then ClassLogger.Add(" >> element in RegeX: " & element.Value, False)
Dim MyPattern = element.Value.Substring(2, element.Value.Length - 3)
Dim input_value
If MyPattern.Contains("txt") Then
If MyPattern.Contains(ClassControlCreator.PREFIX_TEXTBOX) Then
Dim txt As TextBox = CType(pnldesigner.Controls(MyPattern), TextBox)
input_value = txt.Text
ElseIf MyPattern.Contains("cmb") Then
ElseIf MyPattern.Contains(ClassControlCreator.PREFIX_COMBOBOX) Then
Dim cmb As ComboBox = CType(pnldesigner.Controls(MyPattern), ComboBox)
input_value = cmb.Text
End If