Jag håller på att göra en kundregister i VB. Jag undrar om det finns någon funktion där man kollar så att ett datum är rätt i VB. Jag tar textboxen för datumet i en date variabel som sedan skickas in i databasen. Jag undrar om det finns något typ med nummer som Isnumeric för datum för att kolla variabeln innan programmet kraschar för att det var fel datum?? Jag antar att du inte ens prövat med det som verkar mest logiskt... IsDate... :) Funktionen IsDate() kollar om det är en giltlig datum angivelse. Eftersom IsDate() även ger sant om man anger ett klockslag bör man kolla att datumet är större än 1.DAtum koll
Sv: DAtum koll
Sv: DAtum koll
<code>
Private Sub Text1_Validate(Cancel as Integer)
Dim Temp as Date
If IsDate(Text1.Text) Then
Temp = CDate(Text1.Text)
If Temp >= #1/1/1900# Then
'Ok
Else
MsgBox "Du har inte angivit ett datum i Text1."
Cancel = True
End If
Else
MsgBox "Du har inte angivit ett datum i Text1."
Cancel = True
End If
End Sub
</code>