如何将字符串转换为日期 [英] How to convert a string into date
本文介绍了如何将字符串转换为日期的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我正在尝试将字符串转换为日期
I'm trying to convert a string into date
a = Datumo: 16.09.2012.
d = Mid(a, 9, 2) ' 16 - should be the day
m = Mid(a, 12, 2) ' 09 - month
y = Mid(a, 15, 4) ' 2012 - year
Dim dt As Date
dt = DateValue(d, m, y) ' Error line
dt = DateAdd("d", 1, dt) ' should be 17.09.2012.
请问如何做?
推荐答案
不正确使用 DateValue
,替换
dt = DateValue(d, m, y) ' Error line
dt = DateAdd("d", 1, dt) ' should be 17.09.2012.
与
dt = DateSerial(y, m, d)
dt = DateAdd("d", 1, dt)
或
dt = 1 + DateAdd("d", 1, dt)
这篇关于如何将字符串转换为日期的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!
查看全文