Hej...
i linie 3 skriver du svar = text1
der burde nok stå
svar = text1.text
prøv det...
Med venlig hilsen JJ
"Henrik Cichosz" <cichosz@tdcadsl.dk> skrev i en meddelelse
news:3dd6788e$0$94780$edfadb0f@dread15.news.tele.dk...
> hej jeg har en textbox hvor man kan skrive et password så har jeg et modul
> med kode og en knap på formen der starter det hele men jeg kan ikke få det
> til at virke kan nogen give et hint til hvordan jeg får det til at virke
>
> jeg har prøvet med denne kode i mit modul
> Private Sub pass()
> Dim svar
> svar = Text1
> If svar = "test" Then
> MsgBox prompt:="Velkommen"
> Else
> MsgBox prompt:="Forkert Svar"
> End If
>
> End Sub
> mvh Henrik C
>
>
> ---
> Outgoing mail is certified Virus Free.
> Checked by AVG anti-virus system (
http://www.grisoft.com).
> Version: 6.0.419 / Virus Database: 235 - Release Date: 13-11-2002
>
>