by Dr. John Nyhart (4 Submissions)
Category: Miscellaneous
Compatability: Visual Basic 3.0
Difficulty: Unknown Difficulty
Originally Published: Thu 6th July 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)
This function will strip nulls from strings.
If (InStr(OriginalStr, Chr(0)) > 0) Then
OriginalStr = Left(OriginalStr, _
InStr(OriginalStr, Chr(0)) - 1)
End If '»If (InStr(OriginalStr, Chr(0)) > 0) Then
StripNulls = OriginalStr
End Function