[RESOLVED] Issues Interpreting "MyStrg"

[planethax]

I use MsgBox MyStrg to see what MyStrg is
An Example of MyStrg would be 42 02 00 00 00 >

I have tried

If MyStrg = "42 02 00 00 00 " & vbCr & vbCr & ">" Then

If MyStrg = "42 02 00 00 00 " & vbCrlf & vbCrlf & ">" Then

If MyStrg = "42 02 00 00 00 " & vbCr &  ">" Then

If MyStrg = "42 02 00 00 00 " & vbCrlf & ">" Then

If MyStrg = "42 02 00 00 00 >" Then

And many more but none have worked, see images for examples of msgbox MyStrg

[planethax]

To expand on example a bit,
I am trying to find out if freeze frame data is stored in a vehicle.
If none is stored, some vehicles repond with
NO DATA >
and Some with
42 02 00 00 00 >
this line in my code works

If MyStrg = "NO DATA" & vbCrLf & vbCrLf & ">" Then

But This does not

If MyStrg = "42 02 00 00 00 " & vbCrLf & vbCrLf & ">" Then

the complete sub is

Private Sub readffdata_Click()
MSComm1.Output = "02 02" & vbCrLf
Attente (500)
            MyStrg = MSComm1.Input
            MsgBox MyStrg
            If MyStrg = "NO DATA" & vbCrLf & vbCrLf & ">" Then
  hyperffd.ItemAdd lCt + 12, "", lCt, 6, 3
hyperffd.SubItemsAdd lCt + 12, 1, "NO FREEZEFRAME DATA AVAILABLE"
 
 
hyperffd.Enabled = False
            Else
            If MyStrg = "42 02 00 00 00 " & vbCrLf & vbCrLf & ">" Then
             hyperffd.ItemAdd lCt + 12, "", lCt, 6, 3
hyperffd.SubItemsAdd lCt + 12, 1, "NO FREEZEFRAME DATA AVAILABLE"
Else
            hyperffd.ItemAdd lCt, "", MyStrg & lCt, 6, 3
            End If
            End If
            
            
End Sub

[drivenbywhat]

Where is MyStrg coming from? The problem could be that it's different all the time and not constant. In one of your pics, the msgbox starts with 47 instead of 42. So an if/then for 42 wouldn't give you anything for 47 if that is the value that's being held by MyStrg.

I also see that you are only checking for NO DATA & the #s. If the numbers don't really matter and they just mean there is NO FREEZE DATA, just leave that 2nd if/then blank. So if it = NO DATA, it will do what you want and if it doesn't then ELSE would do your code. No need to check for the number.

[planethax]

Sorry, the one that starts with 47 was from a different command
MyStrg is coming from a device on Mscomm1.Port
It will either be
NO DATA > or 42 02 00 00 00 if no data is stored or
42 02 @# @# @# (@#= some hex other than 00)

[drivenbywhat]

Ok, first try this. From that msgbox, you can't tell whether or not there is a space at the end of the 00 string. Your if/then is checking for something like:

If MyStrg = "42 02 00 00 00 " & vbCrLf & vbCrLf & ">" Then

Which is different than:

If MyStrg = "42 02 00 00 00" & vbCrLf & vbCrLf & ">" Then

So try that. It could be where your headache is at.

If that doesn't do it for you, you can search for the first 8 characters instead.

Since you said the string can be something other 00 for the hex numbers, you could just check the first 8 characters in your if then:

eight = left(mystrg, 8)
If eight = "42 02 00" then whatever

because if it was something else, you said it would be something other than 0.

[leinad31]

Its probably vbLf and not vbCrLf

[planethax]

I tried vbLf too and no luck.
I put a space before " and also before and after the > still no luck.
however

eight = left(mystrg, 8)
If eight = "42 02 00" then whatever

worked great.
Though I would like to know why this is happening, I am going to leave it for now till when or if I need to solve it.

On the other hand, I thank you so much Driven, as your code helped me to understand many other things and prevented many more questions lol.

[drivenbywhat]

Glad it's working for you. Now back to the why part. In my previous post I said to take out the space before the quote, not put one in and use the vbcrlf just like you did for NO DATA. In your NO DATA statement you put "NO DATA" & the vbcrlf. You didn't put "NO DATA " with a space there. However, you did this with the "42 00 00 ". So I was telling you to take that space out.

Also, another suggestion to see how the data is being received is to put it in a multiline textbox instead of a msgbox. You can actually select the contents of a textbox compared to a msgbox. That way you can "see" how the data is arriving.