Problemer med If sætning

If txtAnsat.Text = "00-00-0000" Then

if (not IsDate(txtAnsat.Text)) then

Du skriver:
  I = Len(txtAnsat.Text)

Nu indeholder I antallet af tegn i det tekst, der står i text1.text. Har du skrevet "00-00-0000" indeholder I altså tallet 10, da der er 10 tegn i teksten

Du skriver:
  If I = 00-00-0000 Then

Du sammenligner herover æbler og bananer, og det kan man ikke. VB vil opfatte 00-00-0000 som en variabel (med et åndsvagt navn), og ikke som noget tekst. Altså sammenligner du en variabel I indeholdene værdien 10 med en tom variabel ved navn 00-00-0000.

Vil du sammenligne med teksten 00-00-0000, skal du bruge " før at VB opfatter det som tekst i stedet for en tom variabel. Husker du ", er det dog stadig pærer og bananer du sammenligner: En variabel med værdien 10 sammenlignes med noget tekst.



Så alt i alt er det noget nonsens, du har i di9ne første to linier kodee, og du skal slet ikke bruge Len() til noget som helst.

Brug svar fra sjh eller nielle, og drop linien med Len(text1.text)


Godt råd:

Brug "require variable declaration" (sættes under options) - så vil VB f.eks. i ovenstående tilfælde fortælle dig, at du bruger en variabel med navnet 00-00-0000, men at den ikke er oprettet (ved Dim 00-00-0000 as ....). Og så tænker du "Aha - det er jo helt forkert det jeg skriver her"

:o)

Jeg har viast skrevet text1.text et par steder - jeg mener naturligvis txtAnsat.Text

tak nielle det virkede gider du sende et svar

Svar :^)

Du skal stadig ikke bruge I = Len(txtAnsat.Text) til noget i din kode...