在vb里，如何将日期加减，得出天数？

其实vb提供了一个计算两个日期相差的函数datediff，

成都服务器托管，成都创新互联公司提供包括服务器租用、绵阳服务器托管、带宽租用、云主机、机柜租用、主机租用托管、CDN网站加速、申请域名等业务的一体化完整服务。电话咨询：13518219792

在实际应用之中我们可以进行日期相减运算，但是vb推荐的还是

使用vb自己提供的内部函数为好！

一个例子：

Private Sub Command1_Click()

Dim days As Integer

Dim data1 As Date

Dim data2 As Date

data1 = #2/21/2006# 'O2 / 21 / 2006

data2 = #3/21/2006#

days = DateDiff("d", data1, data2)

Text1.Text = Str(days)

End Sub

vb.net 中 日期怎样实现减法

新建一个LABEL控件

然后在FORM_LOAD 事件中输入

Label1.caption=year(now()) 'year可以换成month,day,hour,minute,second

label1.caption=label1.caption-1 '减号后面可以输入你想要的数字

就OK了

VB里面，两个时间相减得到的数是什么啊，

VB里面，两个时间相减得到的数是需要看其差被声明为啥数据类型。

1）当差被声明为Date数据类型，则两个时间相减得到是一个日期。

相应代码：

Option Explicit

Dim rq As Date

Dim rq1 As Date

Dim sj As Date

Private Sub Command1_Click()

sj = rq1 - rq

Text3 = sj

Debug.Print sj

End Sub

Private Sub Form_Load()

rq = #1/1/2015#

rq1 = Now

Text1 = rq

Text2 = rq1

End Sub

2）当差被声明为Variant数据类型，则两个时间相减得到是双精度浮点数。

相应代码：

Option Explicit

Dim rq As Date

Dim rq1 As Date

Dim sj As Variant

Private Sub Command1_Click()

sj = rq1 - rq

Text3 = sj

Debug.Print sj

End Sub

Private Sub Form_Load()

rq = #1/1/2015#

rq1 = Now

Text1 = rq

Text2 = rq1

End Sub

Date 数据类型：

Date 变量存储为 IEEE 64 位（8 个字节）浮点数值形式，其可以表示的日期范围从 100 年 1 月 1 日到 9999 年 12 月 31 日，而时间可以从 0:00:00 到

23:59:59。任何可辨认的文本日期都可以赋值给 Date 变量。日期文字须以数字符号 (#)

扩起来，例如，#January 1, 1993# 或 #1 Jan 93#。

Double 数据类型：

Double（双精度浮点型）变量存储为 IEEE 64 位（8 个字节）浮点数值的形式，它的范围在负数的时候是从 -1.79769313486232E308 到 -4.94065645841247E-324，而正数的时候是从 4.94065645841247E-324 到 1.79769313486232E308。

我想知道vb.net中的时间怎么做相加和相减，谢谢

DateAdd函数 返回

返回包含一个日期的 Variant (Date)，这一日期还加上了一段时间间隔。

语法

DateAdd(interval, number, date)

DateAdd 函数语法中有下列命名参数：

部分 描述

interval 必要。字符串表达式，是所要加上去的时间间隔。

number 必要。数值表达式，是要加上的时间间隔的数目。其数值可以为正数（得到未来的日期），也可以为负数（得到过去的日期）。

date 必要。Variant (Date) 或表示日期的文字，这一日期还加上了时间间隔。

DateDiff函数 返回

返回 Variant (Long) 的值，表示两个指定日期间的时间间隔数目。

语法

DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])

DateDiff 函数语法中有下列命名参数：

部分 描述

interval 必要。字符串表达式，表示用来计算date1 和 date2 的时间差的时间间隔

Date1□date2 必要；Variant (Date)。计算中要用到的两个日期。

Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定，则以星期日为第一天。

firstweekofyear 可选。指定一年的第一周的常数。如果未予指定，则以包含 1 月 1 日的星期为第一周。

文章题目：包含vb.net时间函数相减的词条
当前URL：http://kswjz.com/article/doijhgs.html