AppStd/ToolCollection
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MS BoolVektorIndexierung

Browse Source
This commit is contained in:
SchreiberM 2022-12-08 17:10:55 +01:00
parent a5ec53ad60
commit 5125477983
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.vs/ToolCollection/FileContentIndex/ef55e001-b714-478d-886b-b053248ddf9a.vsidx
View File

Binary file not shown.

7
ToolCollection/ClassNIWindream.vb
View File

@ -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)