' AddTwoDimArrayRow(arr: Array)
' ----------------------------------------------------------------------------
' Fügt an ein zweidimensionales Array eine Zeile an.
' Wichtig: Die Spalten müssen die erste Dimension sein!
' 
' Returns: -
' ----------------------------------------------------------------------------
' Copyright (c) 2021 by Digital Data GmbH
'
' Digital Data GmbH • Ludwig-Rinn-Strasse 16 • D-35452 Heuchelheim
' Tel.: 0641/202360 • E-Mail: info-flow(at)digitaldata.works
' ----------------------------------------------------------------------------
' Creation Date / Author:   18.02.2021 / JJ
' Version Date / Editor:    18.02.2021 / JJ
' Version Number: 			3.0.0.0

Sub AddTwoDimArrayRow(Byref arr)
    ReDim Preserve arr(UBound(arr, 1), UBound(arr, 2) + 1)
End Sub