vb.net日期相加 vbs日期加减

vb.net 时间相加

Module Module1

    Sub Main()

        Console.WriteLine(DateTimeAdd("01:23:45"))

        Console.ReadLine()

    End Sub

    ''' summary

    ''' 获取时间的累加值

    ''' /summary

    ''' param name="sDatetime"/param

    ''' returns/returns

    ''' remarks/remarks

    Private Function DateTimeAdd(ByVal sDatetime As String) As DateTime

        Dim sysTime As DateTime = DateTime.Now

        Return sysTime.Add(TimeSpan.Parse(sDatetime))

    End Function

End Module

相关问答

Q1: vb.net(2008)如何实现日期相加?

Dim d ad Date

Dim mDay as Double

d=Now.Date'设置当天日期或自定义日期CDate("2009-1-9")

mDay=365 '设置天数(或-365)

'以长日期格式返回相距指定天数

Text1.Tex=d.AddDays(mDay).ToLongDateString

效果和你在vb6的一样！

Q2: VB.net 写一个方法，求一个时间变量=系统当前年月时间-去5个月的时间，求大神指点

可以使用VB.NET中的DataTime对象的AddMonths方法：

Dim d1 As Date = Now

MsgBox(d1) '显示现在的机器日期与时间

MsgBox(d1.AddMonths(2)) '显示现在的机器日期加上2个月的对应日期与时间

MsgBox(d1.AddMonths(-1)) '显示现在的机器日期减掉1个月的对应日期与时间

DataTime对象的方法很多，你可以通过在线查阅，例如：

d1.Add()

d1.AddDays()

d1.AddHours()

d1.AddMinutes()

d1.AddSeconds()

d1.AddYears()

等等！

注意：从字面意思可以理解是加，而括号里是填写对应的数值，当数值为负数，起到减的作用了。

Q3: vb.net日期类型怎样加1，例如:今天是2012/5/19,加1之后变成2012/5/20?

您好，请调用AddDays函数！

给个小例子：给DateTimePicker1控件的日期的天数加1 。则是这样！

DateTimePicker1.Value = DateTimePicker1.Value.AddDays(1)

有问题HI我！

关于vb.net日期相加和vbs日期加减的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。