jj: Fix validation to allow for empty strings to be set as an index value

This commit is contained in:
Jonathan Jenne
2018-08-28 14:04:39 +02:00
parent 658569dfe9
commit ad4d416c93
2 changed files with 6 additions and 4 deletions

View File

@@ -2518,7 +2518,8 @@ Public Class frmValidator
missing = True
errmessage = "Please Choose an entry out of ComboBox '" & cmb.Name & "'"
Exit For
ElseIf cmb.SelectedIndex <> -1 Then
'ElseIf cmb.SelectedIndex <> -1 Then
Else 'Änderung 28.08.2018: Ein leerer Wert in der Combobox wird in den Index geschrieben
input = cmb.Text
Dim wertWD As String
'den aktuellen Wert in windream auslesen