If !Krl = "Ja" Then

Do While Not .EOF
  If !Krl Then
    txtKrl.Text = txtKrl.Text + !Navn
  End If
  .MoveNext
Loop

Ved dog ikke om det løser problemet, derfor heller ikke et svar..

Lav lige et svar - det virker!
- Kan du i øvrigt sige mig, hvordan jeg får lavet (KUN) det første bogstav i en string om til uppercase?

vedr. uppercase:

brug:

nytord = lucase(copy(glord,1,1) + copy(glord,2,len(glord))

eller noget i den stil. D.v.s. brug copy til at hente det første tegn frem, lav det om til uppercase og tilføj resten af ordet med copy af resten af ordet, d.v.s fra tegn 2 til slut.

vedr. uppercase:

brug:

nytord = lucase(copy(glord,1,1) + copy(glord,2,len(glord))

eller noget i den stil. D.v.s. brug copy til at hente det første tegn frem, lav det om til uppercase og tilføj resten af ordet med copy af resten af ordet, d.v.s fra tegn 2 til slut.

Og fumes>jo, det løser problemet. Man kan ikke teste på om et boolean er ligmed "ja" eller "nej" o.s.v. Man kunne teste på om den er 0 eller højere (falsk) eller -1 eller mindre (sand) fordi en boolean er en signle byte der kan antage værdier fra -128 til +128 og det afgøres med den ene bit yderst til venstre, hvilket tilfældigvis er den bit boolean operationer tester på og sætter.

Normalt vil man teste på en boolean således:

If !Krl Then (sand) og
If NOT !Krl Then (falsk)

Jeg beklager denne dobbelt konfekt, men en CGI-script error ødelagde mit svar, så jeg kom til at sende det 2 gange

Der er ikke noget i VB der hedder copy... hvordan gøres det så?

Engberg, undskyld det sene svar,

Du har ret i at copy ikke findes i VB, Deter fordi jeg mest bruger Delphi, så indimellem blander jeg tingene sammen. i VB mener jeg det hedder STR og du burde også kunne bruge LEFT. Jeg håber det hjælper lidt.