我必须转换的数据写成单独的变量“月”、“日”和“年”。
我需要转换的数据例如是:月份是“七月”日是“21”年是“2013”
将其结合DateTime.ParseExact
使用CultureInfo.InvariantCulture
:
Dim dtStr = String.Format("{0} {1} {2}", month, day, year)
Dim dt = Date.ParseExact(dtStr, "MMMM dd yyyy", CultureInfo.InvariantCulture)
也看看:http: //msdn.microsoft.com/en-us/library/8kb3ddd4.aspx
如果您不知道数据是否有效,您应该使用DateTime.TryParseExact
:
Dim dt As DateTime
If Date.TryParseExact(dtStr, "MMMM dd yyyy", CultureInfo.InvariantCulture, DateTimeStyles.None, dt) Then
Console.Write("Date is: " & dt.ToShortDateString())
End If
我首先将日期放入一个字符串中
Dim dateString as string = string.format({0} {1} {2}, day, month, year)
其中日、月、年引用保存日期值的变量。
然后尝试
Dim result as DateTime = Convert.ToDateTime(dateString)