diff --git a/.vs/ToolCollection/FileContentIndex/ef55e001-b714-478d-886b-b053248ddf9a.vsidx b/.vs/ToolCollection/FileContentIndex/ef55e001-b714-478d-886b-b053248ddf9a.vsidx deleted file mode 100644 index f4bbe18..0000000 Binary files a/.vs/ToolCollection/FileContentIndex/ef55e001-b714-478d-886b-b053248ddf9a.vsidx and /dev/null differ diff --git a/ToolCollection/ClassNIWindream.vb b/ToolCollection/ClassNIWindream.vb index 448e424..b1ee38e 100644 --- a/ToolCollection/ClassNIWindream.vb +++ b/ToolCollection/ClassNIWindream.vb @@ -184,7 +184,7 @@ Public Class ClassNIWindream myArray(0) = Convert_IndexValue(vType, aValues(0)) _Logger.Debug("RunIndexing_Vektor: Konvertierter Wert: " & myArray(0).ToString) Else - _Logger.Debug("RunIndexing_Vektor: Vektorfeld wird mit MEHREREN Werten gefüllt ") + _Logger.Debug($"RunIndexing_Vektor: Vektorfeld wird mit MEHREREN Werten [{Anzahl}] gefüllt ") Dim _value As String Try 'Die Größe des Arrays festlegen @@ -505,8 +505,9 @@ Public Class ClassNIWindream Dim oAnzahl As Integer = BS.Count 'Vektorfeld wird mit EINEM Wert gefüllt - If oAnzahl = 1 Then + If oAnzahl = 1 Or (oAnzahl = 0 And aValues.Length = 1 And aValues(0) <> "") Then _Logger.Debug("Vektorfeld wird mit EINEM Wert gefüllt ") + value = aValues(0) ReDim myArray(0) myArray(0) = Convert_IndexValue(vType, value) @@ -565,7 +566,7 @@ Public Class ClassNIWindream _Logger.Warn(">> Achtung: Das Profil konnte nicht geladen werden - _selectedProfil is NOTHING") End If Else - _Logger.Debug("Vektorfeld wird mit MEHREREN Werten [oAnzahl] gefüllt ") + _Logger.Debug($"Vektorfeld wird mit MEHREREN Werten [{oAnzahl}] gefüllt ") ' das ausgewählte Profil in _selectedProfile laden _selectedProfil = ClassNIProfile.getProfilByName(Profil)