Welkom op het forum van startpagina!

Dit forum staat op alleen-lezen. Je kan hier informatie zoeken en oude berichten terugvinden, maar geen nieuwe berichten plaatsen.

Naar overzicht van alle forums

invoermasker voor email

grep

05-02-2005 21:30

hoe kan ik een invoermasker maken voor een emailadres?
hoe geef ik aan dat het een willekeurig aantal letters of cijers zijn gevolgd door een @ weer willerkeurig aantal letters of cijfer een PUNT en dan een 2 of 3 letters ..
Huub

12-02-2005 10:40

Hoi Grep,
Mischien is dit een start?
Private Sub EmailAdres_AfterUpdate()
Dim LngAdres As Long
For LngAdres = 1 To Len()
If Mid(, LngAdres, 1) = “@” Then
If LngAdres = 1 Then
MsgBox “U dient iets voor @ te typen”
Else
If Len() - LngAdres < 1 Then
MsgBox “U dient iets na @ te typen”
End If
End If
End If
Next LngAdres
End Sub
Grt.
Huub
onsy

03-09-2013 22:26

hoe kan ik een invoermasker maken voor een emailadres?