20 lines
792 B
Plaintext
20 lines
792 B
Plaintext
' 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
|