|
-
Apr 5th, 2002, 06:48 PM
#22
Thread Starter
Fanatic Member
Here is some code I found here at vb-world that works great.
Function TrimNull(sNullString As String) As String
'=========================================================
'=========================================================
Dim iLen As Integer
Dim iTemp As Integer
Dim sTemp As String
iLen = Len(sNullString)
iTemp = InStr(sNullString, Chr$(0))
If iTemp <> 0 Then
sTemp = Left$(sNullString, iTemp - 1)
sNullString = sTemp
End If
TrimNull = sNullString
End Function
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|