Hur gör man om man vill jämföra början på en sträng för att se om tex de två första bokstäverna är lika som en annan sträng.

dim str1, str2

if len(str1) >= 2 and len(str2) >= 2 then
if left(str1,2) = left(str2,2) then
'lika
else
'olika
end if
end if

Ok fast det skiljer ju på stora och små bokstäver. Jag vill tex att 'tr' ska vara samma som 'Tr' . Eller att bara första bokstaven i strängarna jämförs så att 't' ska vara lika som 'T'.Hur gör man då?
//Johan

<code>
dim str1, str2

if len(str1) >= 2 and len(str2) >= 2 then
if UCase(left(str1,2)) = UCase(left(str2,2)) then
'lika
else
'olika
end if
end if
</code>

/Johan

tack!

Mitt förslag:
<code>
If StrComp(Left(str1,2), Left(str2,2), vbTextCompare) = 0 Then
Respons.Write "Strängarna är lika!"
Else
Respons.Write "Strängarna är olika!"
End if
</code>