Vill ha hjälp med lite kod som kontrollerar att ett riktigt datumformat är skrivet i en textbox.Om inte så skall jag inte på några villkor komma förbi denna textbox. Inte ens genom att ändra focus med musen.

det finns en funktion som heter IsDate som du kan använda för att validera om ditt inskrivna datum är korrekt.

Tack men det vet jag. Skulle villa ha lite kod hur jag använder Keypress_eventet resp validate_eventet och om jag skall använda ytterligare någon kontroll. Har labbat lite men tycker att jag krånglar till det alldeles för mycket. Måste finnas något generellt hur man använder dessa event. Får inte på några villkor komma förbi denna textbox utan giltigt datumformat. Som sagt var gärna lite kod.

Hmm, är det här nåt att ha?

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If Not IsDate(Text1.Text) Then Cancel = 1
End Sub

Private Sub Text1_LostFocus()
If Not IsDate(Text1.Text) Then Text1.SetFocus
End Sub

Hej
Jag tror att du egentligen vill att användaren
skall skriva datum efter ett Format som du
har tänkt.
Då använder jag MaskEdeit box.
i MaskEdit propertie Mask skriver jag så här.

####-##-##

Då har jag bestämt att jag vill ha det i typ

2000-12-28

Det finns många varianter på det här, kom igen
om du vill ha mer info.

IsDate IsNumber mfl ställer bara till strul.

mvh
Sven