VB 怎么获取当前日期前六个月的日期

涉及到日期计算的要转化为日期型变量再来计算：

Dim s As String, d As Date

s = "20090215"

d = CDate(Left(s, 4) & "-" & Mid(s, 5, 2) & "-" & Right(s, 2))

d = DateAdd("m", 6, d)

s = Format(d, "yyyymmdd")

MsgBox s

我分析错误可能来源于以下两个环节:

一是楼主使用了一个函数，而调用的一个过程，可以这样调整：

把txtrkdate=GetRkdate

改成txtrkdate=GetRkdate()

二是查看使用的控件名字是否是txtrkdate，不对的话修改一下。

还不行的话请继续留言。

以上就是关于VB 怎么获取当前日期前六个月的日期全部的内容，包括:VB 怎么获取当前日期前六个月的日期、vb中怎么得到当前日期并显示在txt控件中、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！