将IsDate(stringDate)与CDate(stringDate)结合使用.
使用IsDate()函数确定日期是否可以转换为日期或时间.
CDate()识别日期文字和时间文字以及一些属于可接受日期范围的数字.将数字转换为日期时,整数部分将转换为日期.从午夜开始,该数字的任何小数部分都将转换为一天中的某个时间.
CDate根据系统的区域设置识别日期格式.如果以不同于其中一个识别日期设置的格式提供日,月和年的正确顺序,则可能无法确定.此外,如果长日期格式还包含星期几字符串,则无法识别该日期格式.
以下示例使用CDate函数将字符串转换为日期.
MyDate = "October 19, 1962" ' Define date.
MyShortDate = CDate(MyDate) ' Convert to Date data type.
MyTime = "4:35:47 PM" ' Define time.
MyShortTime = CDate(MyTime) ' Convert to Date data type.