by Tom van den Broek (2 Submissions)
Category: Miscellaneous
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Fri 8th September 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Pop deletes one specific element from an array.
Dim tmparray() As String
Dim counter As Integer
ReDim tmparray(0) As String
For counter = 0 To UBound(iArr)
If (counter <> iPos) And (Trim(key_tab(counter)) <> "") Then
Call push(iArr(counter), tmparray)
End If
Next
ReDim iArr(UBound(tmparray)) As String
For counter = 0 To UBound(tmparray)
iArr(counter) = tmparray(counter)
Next
End Sub