[AccessD] how to split text into its letters...
David McAfee
davidmcafee at gmail.com
Sat Jul 25 16:23:15 CDT 2015
something like this should work
Public Function SeparateChars(strIn As String) As String
Dim strOut As String, i As Integer
For i = 1 To Len(strIn)
Select Case Mid(strIn, i, 1)
Case " ", "|" 'Characters that you want to ignore go here
Case Else
strOut = strOut + Mid(strIn, i, 1) & ","
End Select
'i = i + 1
Next i
SeparateChars = strOut
End Function
End Function
On Sat, Jul 25, 2015 at 10:08 AM, Kostas Konstantinidis <kost36 at otenet.gr>
wrote:
> hi,
> In a field there text values, something like 1234-5679(1678)68:3;1-
> What I need is to split text with every character separate by a comma e.g.
> 1,2,3,4,-,.......,-
>
> Is that possible via query?
>
> thank's
> /kostas
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>
More information about the AccessD
mailing list