发布时间 : 星期日 文章VB函数详解（84个vb自带函数）更新完毕开始阅读
VB函数
参数 number 可以是任何的数值表达式。
注解：如果 number 不是一个整数，那么在执行前会先被四舍五入成最接近的整数。
可以将十六进制数直接以&H开头来表示。例如，&H10代表十进位的 16。
（16）Int、Fix 函数
语法：Int(number)
Fix(number)
该函数返回参数的整数部份。
参数 number 可以是任何的数值表达式。如果 number 的值为Null，则返回Null。
注解：Int 与 Fix 都会去掉 number 的小数部分而返回剩下的整数。
两个函数的不同之处在于，当 number 为负数时，Int 会返回小于或等于 number 的第一个负整数，而 Fix 则会返回大于或等于 number 的第一个负整数。例如， Int 将 -8.4 转成 -9，而 Fix 则将 -8.4 转成 -8。
（17）Oct 函数
语法：Oct(number)
该函数将参数number以八制表示，用 String 返回。 参数 number 可为任何的数值表达式。
注解：如果 number 不是整数，那么在执行前会先四舍五入成最近似的整数。返回值如下： Number的取值 Null Empty 任何其他的数字 可以将八进位数字直接以&O 开头来表示。例如，&O10代表十进位的 8。 Oct返回值 Null 零(0) 最多可到11个八进制数 （18）val 函数 语法：Val(string)
返回包含于字符串内的数字，字符串中是一个适当类型的数值。
注解：必要的 string 参数可以是任何有效的字符串表达式。
Val 函数，在它不能识别为数字的第一个字符上，停止读入字符串。那些被认为是数值的一部分的符号和字符，例如美圆号与逗号，都不能被识别。但是函数可以识别进位制符号 &O（八进制）和 &H（十六进制）。空白、制表符和换行符都从参数中被去掉。 下面的返回值为 1615198： Val(\
VB函数
在下面的代码中，Val 为所示的十六进制数值返回十进制数值 -1。 Val(\
附注：Val 函数只会将句点（.）当成一个可用的小数点分隔符。当使用不同的小数点
分隔符时，如在国际版应用程序中，代之以 CDbl 来把字符串转换为数字。
日期时间函数
（1）Date 函数
语法：date
返回当前系统日期。
（2）DateAdd 函数
语法：DateAdd(interval, number, date)
返回内容为某个基准日期加上或减去数个时间间隔单位后的日期。 DateAdd 函数语法中有下列几部分：
interval为必须项。字符串表达式，表示所要加上去的时间间隔单位。其值请参考设定部分。
Number为必须项。数值表达式，表示要加上的时间间隔单位的次数。其数值可以为正数(可得未来日期)，亦可以为负数(可得过去的日期)。
Date为必须项。可为型态为 Variant (Date) 的变数或正确表示出日期的字符串，代表基准日期，将此基准日期加上 number 次的 interval 后，即为返回值日期。 参数 interval 的设定值如下： yyyy表示年 q表示季 m表示月 y表示一年的日数 d表示日
w表示一周的日数 ww表示周 h表示时 n表示分 s表示秒
注解：可以使用 DateAdd 函数计算基准日期加上或减去您所指定的时间间隔后的结果。例如，可以用DateAdd 来计算
从今天起三十天后或三十天前的日期是哪一天；或者计算距离现在 45 分钟前或 45分钟后的时间。如果时间间隔是以 [天] 来计算，interval 参数可以是 [一年的日数] (\，[日] (\，或 [一周的日数] (\。
DateAdd 函数所返回的日期一定是有效且正确的。下面的范例以一月三十一日为基准日，计算加上一个月后的结果。
NewDate = DateAdd(\
VB函数
DateAdd 返回 28-Feb-95，而不是 31-Feb-95。如果基准日 date 是 31-Jan-96，返回值则是 29-Feb-96，因为 DateAdd 函数知道 1996 年是闰年。
如果计算出来的年度超过 100，就会产生程式错误。
如果 number 参数不是一个 Long 值，计算时会取最接近的整数值来计算。
（3）DateDiff 函数
语法：DateDiff(interval, date1, date2 [,firstdayofweek[, firstweekofyear]])
返回两个日期间相差的时间间隔单位数目。 DateDiff 函数语法中有下列几部分：
interval 为必须项。字符串表达式，表示用来计算 date1 及 date2 时间差的时间间隔单位。 date1, date2 为必须项。日期表达式,为要用来计算的两个日期。
firstdayofweek 可选项。常数，表示一星期的第一天。如果省略此参数，则以星期日为第一天。
firstweekofyear 可选项。常数，表示一年的第一周。如果省略此参数，则以包含 一月一日的星期为第一周。 参数 interval 的设定值如下： yyyy表示年 q表示季 m表示月 y表示一年的日数 d表示日
w表示一周的日数 ww表示周 h表示时 m表示分 s表示秒
参数 firstdayofweek 的设定值如下： 常数 vbUseSystem vbSunday vbMonday vbTuesday vbWednesday vbThursday vbFriday vbSaturday 参数 firstweekofyear 的设定值如下： 常数 值 说明 值 0 1 2 3 4 5 6 7 说明 使用NLS API 设定 星期日（默认值） 星期一 星期二 星期三 星期四 星期五 星期六 VB函数 vbUseSystem vbFirstJan1 vbFirstFourDays vbFirstFullWeek 注解：可以使用 DateDiff 函数来决定两个日期之间的时间间隔单位数目。例如，使用 DateDiff 来计算某两个日期之间
相隔几日，或计算从今天起到年底还有多少个星期。
如果想知道 date1 与 date2 相差的 [日] 数，interval 可以是 [一年的日数] (\或 [日] (\。如果 interval 是 [一周的日数] (\，DateDiff 会返回两日期间相差的周数。如果date1 是星期一，DateDiff 会计算到 date2 为止之星期一的个数，包含 date2 但不包含 date1。不过，如果 interval 是 [周] (\，DateDiff 函数会藉由计算 date1 与 date2 之间星期天的个数，会返回两日期间的 [日历周] 数。如果 date2 刚好是星期天，则 date2 也会被加进计数结果中；但不论 date1 是否为星期天，它都不会被算进去。 如果 date1 比 date2 来得晚，DateDiff 函数返回值为负数。
如果 interval 参数为 [w] 或 [ww]，firstdayofweek 参数会影响其计算结果。
如果 date1 或 date2 以短式日期的格式传入日期参数，参数内所有年份若有给定，则该日期便是固定的。但是，若 date1 或 date2 以双引号括起来，且年份并未给定，则现在的年份便会自动加入date1 或 date2 参数中。如此书写便可适用于不同年份而无须更改代码。
但若计算十二月三十一日和来年的一月一日的年份差，DateDiff 会返回 1 表示相差一个年份，虽然实际上只相差一天而已。
0 1 2 3 使用NLS API设定。 包含一月一日的星期(默认值)。 第一个至少包含此年度四天的星期。 第一个完整的星期。 （4）DatePart 函数
语法：DatePart(interval, date[, firstdayofweek[, firstweekofyear]])
返回指定日期的某个时间部分。 DatePart 函数语法有下列几部分：
interval为必须项。字符串表达式，指定的时间间隔单位。请参阅设定部份。 date 必须项。日期表达式，所要指定的日期。
firstdayofweek为可选项。常数，表示一星期的第一天。如果省略此参数，则以星期日为第一天。请参阅设定部分。
firstweekofyear 可选项。常数，表示一年的第一周。如果省略此参数，则以包含一月一日的星期为第一周。 参数 interval 的设定值同前面的datadiff.
注解：使用 DatePart 函数来得知某个日期的特定时间单位。例如，您可以使用 DatePart 来得知某个日期资料是星期几，
或是几点钟。
如果 interval 参数为 [w] 或 [ww]，firstdayofweek 参数会影响其计算结果。
如果 date 以短式日期的格式传入日期参数，参数内的年份若给定，则该日期便是固定的。但是，若date 以双引号括起来，且年份并未给定，则现在的年份便会自动加入 date 参数中。这样便可适用于不同年份而无须更改程序代码。
（5）DateSerial 函数