správnost datumu
15. 4. 2009
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If IsDate(TextBox1.Text) = True Then
MsgBox("datum je Ok", 64, "Zprava")
Else
MsgBox("datum je chybne", 16, "Upozorneni")
End If
End Sub