vb内部函数补充知识

《vb内部函数补充知识》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、DateAdd函数返回包含一个日期的Variant(Date)，这一日期还加上了一段时间间隔。语法DateAdd(interval,number,date)DateAdd函数语法中有下列命名参数：部分描述interval必要。字符串表达式，是所要加上去的时间间隔。number必要。数值表达式，是要加上的时间间隔的数目。其数值可以为正数（得到未来的日期），也可以为负数（得到过去的日期）。date必要。Variant(Date)或表示日期的文字，这一日期还加上了时间间隔。设置interval参数具有以下设定值：

2、设置描述yyyy年q季m月y一年的日数d日w一周的日数ww周h时n分钟s秒说明可以使用DateAdd函数对日期加上或减去指定的时间间隔。例如，可以用DateAdd来计算距今天为三十天的日期；或者计算距现在为45分钟的时间。为了对date加上“日”，可以使用“一年的日数”(“y”)，“日”(”d”)或“一周的日数”(”w”)。DateAdd函数将不返回有效日期。在以下实例中将1月31日加上一个月：DateAdd(m,1,31-Jan-95)上例中，DateAdd返回1995年2月28日，而不是1995年2月3

3、1日。如果date是1996年1月31日，则由于1996年是闰年，返回值是1996年2月29日。如果计算的日期超前100年（减去的年度超过date中的年份），就会导致错误发生。如果number不是一个Long值，则在计算时取最接近的整数值来计算。注意   DateAdd返回值的格式由ControlPanel设置决定，而不是由传递到date参数的格式决定。DateDiff函数  返回Variant(Long)的值，表示两个指定日期间的时间间隔数目。语法DateDiff(interval,date1,date2

4、[,firstdayofweek[,firstweekofyear]])DateDiff函数语法中有下列命名参数：部分描述interval必要。字符串表达式，表示用来计算date1和date2的时间差的时间间隔Date1□date2必要；Variant(Date)。计算中要用到的两个日期。Firstdayofweek可选。指定一个星期的第一天的常数。如果未予指定，则以星期日为第一天。firstweekofyear可选。指定一年的第一周的常数。如果未予指定，则以包含1月1日的星期为第一周。设置interval

5、参数的设定值如下：设置描述yyyy年q季m月y一年的日数d日w一周的日数ww周h时n分钟s秒firstdayofweek参数的设定值如下：常数值描述vbUseSystem0使用NLSAPI设置。vbSunday1星期日（缺省值）vbMonday2星期一vbTuesday3星期二vbWednesday4星期三vbThursday5星期四vbFriday6星期五vbSaturday7星期六常数值描述vbUseSystem0用NLSAPI设置。vbFirstJan11从包含1月1日的星期开始（缺省值）。vbFir

6、stFourDays2从第一个其大半个星期在新的一年的一周开始。vbFirstFullWeek3从第一个无跨年度的星期开始。说明DateDiff函数可用来决定两个日期之间所指定的时间间隔数目。例如，可以使用DateDiff来计算两个日期之间相隔几日，或计算从今天起到年底还有多少个星期。为了计算date1与date2相差的日数，可以使用“一年的日数”(y)或“日”(d)。当interval是“一周的日数”(w)时，DateDiff返回两日期间的周数。如果date1是星期一，DateDiff计算到date2为止

7、的星期一的个数。这个数包含date2但不包含date1。不过，如果interval是“周”(ww)，则DateDiff函数返回两日期间的“日历周”数。由计算date1与date2之间星期日的个数而得。如果date2刚好是星期日，则date2也会被加进DateDiff的计数结果中；但不论date1是否为星期日，都不将它算进去。如果date1比date2来得晚，则DateDiff函数的返回值为负数。firstdayofweek参数会影响使用时间间隔符号“W”或“WW”计算的结果。如果date1或date2是日期

8、文字，则指定的年份成为该日期的固定部分。但是，如果date1或date2用双引号("")括起来，且年份略而不提，则在每次计算表达式date1或date2时，当前年份都会插入到代码之中。这样就可以书写适用于不同年份的程序代码。在计算12月31日和来年的1月1日的年份差时，DateDiff返回1表示相差一个年份，虽然实际上只相差一天而已。InputBox函数      在一对话框来中显示提示，等待用户输入正文或按下按