Detecting the space character

  • Thread starter Thread starter JN
  • Start date Start date
J

JN

Hi All,

I am trying to detect the space character in a string but my code is not
working.

Thanks for your help.
JN

sub demo()

Dim strlength As Integer
Dim str As String

str = "good morning"

strlength = Len(Trim(str))

For i = 1 To strlength
If Mid(str, i, strlength) = Chr(32) Then
MsgBox "space"
End If
Next i

End Sub
 
If Mid(str, i, strlength)
should be
If Mid(str, i, 1)

Start in position i for 1 character.
 
One way:

Const str As String = "good morning"
Dim nPos As Long
nPos = InStr(str, " ")
If nPos Then Msgbox "space at character " & nPos
 
Why not use Instr() ?

In any case, maybe you could try
....
If Mid(str, i, 1) = Chr(32) Then
....

Tim
 
Back
Top