Hej

Jag vill kontrollera att användaren matat in ett korrekt datum och tidsformat.
Jag börjar med att dela upp datum och tid för sig sedan
används IsDate för datumet, men hur gör man med tiden?
Det kanske går att kolla både datum och tiden på en gång och
då slippa dela upp det?

Ex är enligt nedan.

justtid="2001-12-09 12:30:15"

datum = Left(justtid, 10)
klockan = Mid(justtid, 12, 8)
If Not IsDate(datum) then msgbox"Kontrollera datumformatet!"

Mvh
Pontus

Hej
Så här skulle du kunna göra.

Option Explicit

Private Sub Command1_Click()
Dim justtid As String, datum As String, klockan As String
justtid = "2001-12-09 12:30:15"
datum = Left$(justtid, 10)
klockan = Right$(justtid, 8)
If Not IsDate(datum) Then MsgBox "Kontrollera datumformatet !"
If Not IsDate(klockan) Then MsgBox "Kontrollera tidsformatet !"
End Sub

mvh
Sven

Så får det bli!
Tack ska du ha Sven!

Pontus

Ett annat sätt är att använda MaskEdti kontrollen eller datepicker...

Det vet jag inte vad det är men kan leta lite i hjälpen.
Tack för ditt tips.

Pontus

Igen
MaskEdit är mycket bra för att styra användaren att skriva rätt.

Sa Bull
DS