---

Hej News Group!

Jeg har et textfelt hvor jeg gerne vil have vist en Msgbox hvis der ikke er
indtastet
noget i boksen og hvis der er indtastet noget bliver Msgboxen ikke vist.

Hvem kan hjælpe mig med dette???


Mvh

Carsten Petersen

---

"Carsten Petersen" <carsten.p@mail.dk> skrev i en meddelelse
news:3ec4efd6$0$32523$edfadb0f@dread16.news.tele.dk...
> Hej News Group!
>
> Jeg har et textfelt hvor jeg gerne vil have vist en Msgbox hvis der ikke
er
> indtastet
> noget i boksen og hvis der er indtastet noget bliver Msgboxen ikke vist.

Ikke *helt* forstået, men noget i retning af...

If Text1 = "" Then
MsgBox "Text1 må ikke være tom"
End If

- skal det foregå ved selve indtastningen...? Så læg koden i Text1_Change()
eventen

--
mvh
Jens Vestergaard (mailadr i dette indlæg er ikke gyldig!)
www.railsoft.dk
Døgnets jernbanenyheder: www.railsoft.dk/medier.asp

---

"Carsten Petersen" skrev d. 16-05-03 15:04 dette indlæg :
> Hej News Group!
>
> Jeg har et textfelt hvor jeg gerne vil have vist en Msgbox hvis der
ikke er
> indtastet
> noget i boksen og hvis der er indtastet noget bliver Msgboxen ikke
vist.
>
> Hvem kan hjælpe mig med dette???
>
Prøv med følgende kode i formularen:

Private Sub textfelt_LostFocus()
If Me.textfelt.Text = "" Then 'Fejlmeld hvis feltet er
blankt
MsgBox "Dette felt skal udfyldes", vbCritical
Me.textfelt.SetFocus 'og markør tilbage til
feltet
End If
End Sub
>
> Mvh
>
> Carsten Petersen
>
>

--
Leveret af:
http://www.kandu.dk/
"Vejen til en hurtig løsning"