> Ok, i am having a problem, the thing is, my code is only going so far, and when
> it hit the line marked with **** it simple doesnt test it.
> Is there some limit for it ?
> or have i reached some kind of variable limit ?
>
> the program itself is quite big, and that if, was one of the first things, and
> it was working back when i coded it, i extensively tested it.
> its a search form through a database. its for a real estate control program i am
> coding.
>
> code is as follows
> In reply to:
> If Problema12.ListIndex 0 And Problema22.ListIndex 0 And urgencia2.ListIndex =
> 0 And cmb_valor2.ListIndex = 0 Then
> 'Label51.Caption = "teste"
> posicao = dBase.FindText(Problema12.List(Problema12.ListIndex), inicio, 2)
> If posicao = -1 Then Exit Sub
> If posicao -1 Then
> 'inicio2 = posicao
> dBase.AbsolutePosition = posicao
> achou = dBase.Field(3)
> Label1.Caption = achou
> Label2.Caption = Problema22.List(Problema22.ListIndex)
> Label51.Caption = achou
> Label52.Caption = Label2.Caption
>
> ***** If Label1.Caption = Label2.Caption Then
> List12.AddItem posicao, 0
> dBase.AbsolutePosition = posicao
> mostrartipo = dBase.Field(2)
> List2.AddItem mostrartipo, 0
> mostrardorm = dBase.Field(8)
> List3.AddItem mostrardorm, 0
> mostrarend = dBase.Field(0)
> List4.AddItem mostrarend, 0
> mostrarvalor = dBase.Field(13)
> List5.AddItem mostrarvalor, 0
> mostrarcontato = dBase.Field(11)
> List6.AddItem mostrarcontato, 0
> temfoto = dBase.Field(15)
> 'temfoto2 = Left(temfoto, 1)
> List13.AddItem temfoto, 0
> Label52.Caption = posicao
> MsgBox "não falhou"
> 'If temfoto2 "" Then
> ' List13.AddItem "S", 0
> ' GoTo temfoto1
> 'End If
> 'List13.AddItem "N", 0
> 'temfoto1:
> ***** End If
> posicao = posicao + 1
> inicio = posicao
> achou = " "
>
> End If
> End If
> The part between the **** is not being tested.
> and i am using label51 and label52 to check, and the values DO match, and so,
> the code should be doing the stuff between the **** lines.
>
> Any ideas ?
>

So what happens? Does it not get to that line, or does it always say that Label1.Caption <> Label2.Caption?
If it says Label1.Caption <> Label2.Caption, try checking the lengths of both strings, and then if that doesn't give a clue, get the ascii code of each character to make sure there's not an extra carriage return/line feed.
Also, check that TypeName(Label1.Caption) = TypeName(Label2.Caption) in case somehow one of them is a Variant...

Post back if you need more info, and I'll check tomorrow...