remove scrollbar in frmIndex, fix multiple saved values in lookup control, remove version tag button, fix final messagebox filename, allow null for wd index, delete skipped files

This commit is contained in:
Jonathan Jenne
2020-04-02 13:21:38 +02:00
parent b2c7299d2f
commit 29b29059a9
12 changed files with 804 additions and 872 deletions

View File

@@ -76,10 +76,19 @@ Public Class ClassControls
}
If Not String.IsNullOrEmpty(Vorgabe) Then
Dim oDefaultValues = Vorgabe.
Split(",").ToList().
Select(Function(item) item.Trim()).
ToList()
Dim oDefaultValues As New List(Of String)
If Vorgabe.Contains(",") Then
oDefaultValues = Vorgabe.
Split(",").ToList().
Select(Function(item) item.Trim()).
ToList()
Else
oDefaultValues = Vorgabe.
Split(ClassConstants.VECTORSEPARATOR).ToList().
Select(Function(item) item.Trim()).
ToList()
End If
oControl.SelectedValues = oDefaultValues
End If