Har fastnat på en väldigt enkel sak.
Combo1 kan ha texten:
English _gb_medlem.asp

om då Combo3 ha följande text:
GB_UNITED KINGDOM_English

skall ingenting hända, annars så skall
txtSprak.Text = ""

Borde vara enkelt.
<code>
Dim dela As Variant, borjan As String
dela = Split(Combo1.Text, "_")
borjan = LCase(Left(Combo3.Text, 2))

If dela(1) = borjan Then
Else
txtSprak.Text = ""
End If
</code>
Resultatet blir alltid att txtSprak.Text är tomt.
Vad missar jag?

Hej, vet inte om det gör skillnad men du bör dimma så här:
¨

<code>
Dim dela() as string

dela=split osv

</code>

Sen undrar jag, du får ju bara txtsprak att bli "", när får den annat? o vad ska det stå?
<code>

If dela(1) = borjan Then

HÄR HÄNDER INGET

Else
txtSprak.Text = "" HÄR FÅR DEN INGET
End If
</code>
Vad har jag missat?

/B

Hej!
När jag bytte till Dim dela() as string då fick jag bara error.
När jag gick tillbaka till Dim dela As Variant, borjan As String då är den biten ok
Dela innehåller ALLTID någonting.

Du har inte missat någonting, därför att jag har byggt koden som så,
Är dela(1) = borjan lika då laddas det in text ifrån en sparad fil,
annars så skall txtSprak.Text vara tomt

Jag har kollat med msgbox..........

mmmm
Mycket märkvärdigt nu fick jag igång det.
<code>
Dim dela As Variant, borjan As String
If Len(Combo1.Text) > 5 And Len(Combo3.Text) > 5 Then
dela = Split(Combo1.Text, "_")
borjan = LCase(Left(Combo3.Text, 2))
If dela(1) <> borjan Then
txtSprak.Text = ""
Else
End If
End If
</code>
Tack för visat intresse