Advanced Search

Return to Snippet

Revision: 24429
at March 1, 2010 15:57 by CaptainProton
Initial Code 
Private Function isDate(dateString As String) As Boolean
  On Error GoTo NoDate
  
  Dim test As Date
  test = DateValue(dateString)
  isDate = True
  Exit Function
  
NoDate:
  isDate = False
End Function
Initial URL 

                                

                                                            

                                    

                                        

                                        Initial Description
                                        

                                    

                                    
This method checks whether a given string is a valid date (current regional settings are used)

                                

                                                            

                                    

                                        

                                        Initial Title
                                        

                                    

                                    
isDate(String) As Boolean

                                

                                                            

                                    

                                        

                                        Initial Tags
                                        

                                    

                                    
date

                                

                                                            

                                    

                                        

                                        Initial Language
                                        

                                    

                                    
Visual Basic