Dim s As String = "19990909"s = DateTime.ParseExact(s, "yyyyMMdd", system.Globalization.CultureInfo.CurrentCulture).ToString("yyyy-MM-dd")
多种格式可以转换("yyyy/MM/dd")
Dim s As String = "19990909"s = DateTime.ParseExact(s, "yyyyMMdd", system.Globalization.CultureInfo.CurrentCulture).ToString("yyyy-MM-dd")
多种格式可以转换("yyyy/MM/dd")