Dim a As String Dim b As Date a = "2016-11-18" b = CDate(a)本例中最主要的就是CDate()函数,这个函数是用于把字符型变量转换成日期型变量,字符型变量(本例中的a)如果不是标准的日期格式,请先用字符串函数处理成标准日期格式再用CDate函数进行转换,否则会报错