Remove spaces from a string If you want to remove spaces from a text string, then you will need to "walk" the string. A sample function is below: Function fRemoveSpace(ByVal strName As String) As String     Dim intPos As Integer, intLen As Integer     Dim strDummy As String     intLen = Len(strName)     For intPos = 1 To intLen         If Mid(strName, intPos, 1) = " " Then             strDummy = strDummy         Else             strDummy = strDummy & Mid(strName, intPos, 1)         End If     Next intPos     fRemoveSpace = strDummy End Function Top   HOME | NEW | TABLES | QUERIES | FORMS | REPORTS | GENERAL | API | DOWNLOADS | TUTORIAL | RESOURCES E-MAIL Copyright & Disclaimer

Last modified at 06/06/2006 14:54:29