Library code snippets
Strip Spaces from String
By Andrew Yap, published on 14 Jul 2001
Strip Spaces from String
Usually this function helps a lot in data cleansing.
Call the function FnCleanString with a string values and it will reformat and pass back a string with all the spaces removed.
You can modify this code to cater for other scenarios, say stripping numeric characters or stripping non alphabets from string.
Usefulness is very much on how creative you can apply this function. Have fun.
:)
Function FnCleanString(pString As String) As String
Dim tString As String
Dim tLength As Integer
Dim lCtr As Integer
tString = ""
tLength = Len(pString)
For lCtr = 1 To tLength
If Mid(pString, lCtr, 1) <> " " Then
tString = tString & Mid(pString, lCtr, 1)
End If
Next lCtr
FnCleanString = tString
End Function
Related articles
Related discussion
-
VB6 Runtime error 381 subsript out of range Error
by Uncle (2 replies)
-
passing and reading parameters from using Shell
by jigartoliya (0 replies)
-
Convert C++ code to VB6
by mawcot (4 replies)
-
listbox scrollbar
by Dennijr (10 replies)
-
Can you describe Above simple VB6 code?
by pramodmca09 (0 replies)
Related podcasts
-
Christian Beauclair
14 mai 2008 (�mission #0074) ::.Christian Beauclair: Stratégies de migration VB6 vers .NET Nous discutons avec Christian Beauclair des stratégies de migration VB6 vers .NET. Entre autres, nous discutons comment utiliser le "VB 6 Code Advisor" et le "Interop Forms Toolkit" pour ajouter la puiss...
Hi,
I urgent help.
I have a string like " where are you,"can you help me" please." So I need to remove the quotes " " in between quotes. Any one can help in this.
I need the string should be like this " Where are you,can you help me please".
I need to remove the quotes between middle of the string.
Its urgent help....
Thanks in advance..
Try the replace Function
Replace(StringGoesHere," ","")
This thread is for discussions of Strip Spaces from String.