big big problem !!!! need help

Dim parts() As String = txtMessageText.Split(".")

str = parts(0)

If str = "C" Or str = "c" Then

Number = parts.Length
If Number.Equals(3) = True Then


fname1 = parts(1)
lname1 = parts(2)
IntError = MsgBox("Got Customer Cancel Booking !", MsgBoxStyle.OKOnly, "Restaurant Sean")

End If

If Number.Equals(3) = False Then

TextMessage = "Cancel Error, Please Enter By Sequence Example c/C.CustomerFirstName.CustomerLastName ! Thank You."

End If

End If

i got a problem with this coding, it only help me to detect the true site but when the Number.Equals(3) = False Then nothing to display to me. wat is the problem ?

Dear ninja, I'm very tired (in Italy it's 22.00), because last night I almost did not sleep and, more, I always have doubts about my english, but if I have understood your problem, perhaps you can try this way:


Dim parts() As String = txtMessageText.Split(".")
str = parts(0)

If str = "C" Or str = "c" Then

Number = parts.Length
If Number.Equals(3) = True Then

fname1 = parts(1)
lname1 = parts(2)
IntError = MsgBox("Got Customer Cancel Booking !", MsgBoxStyle.OKOnly, "Restaurant Sean")

Else

MsgBox("Cancel Error, Please Enter By Sequence Example c/C.CustomerFirstName.CustomerLastName ! Thank You.")

End If

Beg your pardon, if I misunderstood something!
Good job:)

Thank you for your helping ~
i very appreciate for your helping

thank you