不是常规的日期类型,要这样写代码
dim str as string = "23-08-2017 03:18:58"Dim dt As Date = DateTime.ParseExact(str, "dd-MM-yyyy HH:mm:ss", System.Globalization.CultureInfo.InvariantCulture)msgbox(dt)