Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic
Expertise: Beginner
Nov 18, 1998



Building the Right Environment to Support AI, Machine Learning and Deep Learning

Erase a Variant Array

You'll find the IsArray() function helpful when you use Variant arrays that you can set or unset through your code and need to test often. However, once you declare the array, IsArray() returns True, even if the array has been erased using the Erase keyword. To solve this, reset a Variant array by assigning zero or null, so the IsArray() function returns the proper value:
Dim myVar As Variant
Debug.Print IsArray(myVar)	'Returns False
ReDim myVar(0 To 5)
Debug.Print IsArray(myVar)	'Returns True
Erase myVar
Debug.Print IsArray(myVar)	'Returns True
myVar = 0
Debug.Print IsArray(myVar)	'Returns False
To avoid this kind of tricky problem, use an Erase subroutine like this one:
Public Sub vErase(ByRef pArray As Variant)
	Erase pArray
	pArray = 0
End Sub
Nicolas Di
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date