vb常用函数大全和公式

一、员工信息表公式

1、计算性别(F列)

=IF(MOD(MID(E3,17,1),2),'男','女')

2、出生年月(G列)

=TEXT(MID(E3,7,8),'0-00-00')

3、年龄公式(H列)

=DATEDIF(G3,TODAY(),'y')

4、退休日期(I列)

=TEXT(EDATE(G3,12*(5*(F3='男') 55)),'yyyy/mm/dd aaaa')

5、籍贯(M列)

=VLOOKUP(LEFT(E3,6)*1,地址库!E:F,2,)

注：附带示例中有地址库代码表

6、社会工龄(T列)

=DATEDIF(S3,NOW(),'y')

7、公司工龄(W列)

=DATEDIF(V3,NOW(),'y')&'年'&DATEDIF(V3,NOW(),'ym')&'月'&DATEDIF(V3,NOW(),'md')&'天'

8、合同续签日期(Y列)

=DATE(YEAR(V3) LEFTB(X3,2),MONTH(V3),DAY(V3))-1

9、合

Format$(Now,\EOA\

只要这么一句~~~~~就可以得到“ 二○○六年五月二十六日” 亏我还得写得那么多。。。

所以对FORMAT函数进行研究，参照HELP文件，把一些用法写了下来。 现拿给大家共享。。。

--------------------------------- Format[$] ( expr [ , fmt ] ) format 返回变体型 format$ 强制返回为文本 -------------------------------- 数字类型的格式化 --------------------------------

固定格式参数：

General Number 普通数字，如可以用来去掉千位分隔号 format$(\返回值 100123.12

Currency 货币类型，可添加千位分隔号和货币符号 format$(\返回值 ￥100,123.12

Fixed 格式为带两位小数的数字

format$(\返回值 100123.00

Standard 标准，即带千位分隔号和两位小数 format$(\tandard\返回值 100,123.00

Percent 百分数

VB函数大全基本函数大全

VB 函数大全基本函数大全Abs And Array Asc 函数 运算符 函数 函数 返回数的绝对值执行两个表达式的逻辑连接。 执行两个表达式的逻辑连接。

返回含一数组的 变体 返回字符串首字母的 ANSI 字 符代码

Atn CBool

函数 函数

返回数的反正切值 返回已被转换为 Boolean 子 类型的变体的表达式

CByte

函数

返回已被转换为字节子类型的 变体的表达式

CCur

函数

返回已被转换为货币子类型的 变体的表达式

CDate

函数

返回已被转换为日期子类型的 变体的表达式

CDbl

函数

返回已被转换为双精度子类型 的变体的表达式

Chr CInt

函数 函数

返回指定 ANSI 字符码的字符 返回已被转换为整数子类型的 变体的表达式

Class

对象

提供对已创建的类的事件的访

VB函数大全基本函数大全

问 Class Clear CLng 语句 方法 函数 声明类名 清除 Err 对象的所有属性设置 返回已被转换为 Long 子类型 的变体的表达式 Const Cos CreateObject 语句 函数 函数 声明用于字母值的常数。 声明用于字母值的常数。 返回角度的余弦值。 返回角度的余弦值。 创建并返回对“自动” 创建并返回对“

VB常用函数（1）

一、 数学函数 在具体编程过程中，各类数学函数会被使用，数学函数用于数学计算，包括三角函数、求平方根函数、求绝对值函数、对数函数、指数函数等。它们与相应的数学定义相同。

使用数学函数时应注意一下几点：

1、 三角函数的参数应是弧度数，如sin300应写成：

Sin(30*3.14159/180)

2、Rnd()函数返回[0,1)之间的一个随机数，它往往和Randomise结合使用,后者将随机数初始化，避免Rnd()产生相同的随机数。

表1 常用数学函数

[探讨题1]请在屏幕上打印出[5,6）之间的随机数 Private Sub Command1_Click() Randomize a = Rnd()+5

Print a End Sub

[探讨题2]请在屏幕上打印出[5,11)之间的随机数

Private Sub Command1_Click() Randomize a = Rnd*6+5 Print a End Sub

[探讨3]请在屏幕上打印出[b,c )之间的随机数,并请同学熟记

Private Sub Command1_Click() Randomize a = Rnd*(c-b)+b

4．5 常用内部函数

为了满足用户编程的需要，VB在系统内部提供了若干个能完成某个特定功能的程序段，这些程序段称为内部函数。如求某个数的平方根的函数，求某个数的对数的函数等。 在程序中使用函数称为函数调用，函数调用的一般格式为： 函数名(参数1，参数2，?)

其中，参数(也称自变量)放在圆括号内，若有多个参数，参数间以逗号分隔。

函数调用后，一般都有一个返回值，即函数值。例如：

y=Sqr(7)

其中，Sqr是内部函数名，7为参数。运行时，该语句调用内部函数Sqr来求7的平方根，其计算结果由系统返回作为Sqr的值。本例把返回值赋给变量y。

在包含有函数的表达式中进行运算时，系统将优先进行函数调用。函数调用往往包含在表达式中，不能作为一条独立的语句使用。

VB的内部函数大体上分为四大类：数学函数、字符串函数、日期与时间函数和转换函数。

4．5．1 数学函数

表4-5列出了VB提供的10种常用数学函数。

表4–5 常用数学函数 函 数 Sin(x) Cos(X) Tan(x) Sqr(x) Exp(x) Log(X) Fix(x) 返回值类型 Double Double Double Double Double Double Double

VB函数大全 Calendar 常数

可在代码中的任何地方用下列常数代替实际值： 常数 值 描述

vbCalGreg 0 指出使用的是阳历。

vbCalHijri 1 指出使用的是伊斯兰历法。

-------------------------------------------------------------------------------- Color 常数

可在代码中的任何地方用下列常数代替实际值： 常数 值 描述

vbBlack 0x0 黑色 vbRed 0xFF 红色

vbGreen 0xFF00 绿色 vbYellow 0xFFFF 黄色 vbBlue 0xFF0000 蓝色

vbMagenta 0xFF00FF 紫红色 vbCyan 0xFFFF00 青色 vbWhite 0xFFFFFF 白色

-------------------------------------------------------------------------------- Comparison常数

下列常数由 Visual Basic for Applications 中的类型库定义，可用来在代码中的任何地

字符函数 函数名 功能 示例 ASC

返回一个 Integer，代表字符串中首字母的字符代码。 Asc(string) CHR

返回 String，其中包含有与指定的字符代码相关的字符 Chr(charcode)

Format

返回 Variant (String)，其中含有一个表达式，它是根据格式表达式中的指令来格式化的。

Format(expression[, format[, firstdayofweek[, firstweekofyear]]]) Hex

返回代表十六进制数值的 String。 Hex(number) InStr

返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。 InStr([start, ]string1, string2[, compare])

InstrRev

返回一个字符串在另一个字符串中出现的位置，从字符串的末尾算起。 InstrRev(string1, string2

Abs 函数

返回参数的绝对值，其类型和参数相同。 语法 Abs(number)

必要的 number 参数是任何有效的数值表达式，如果 number 包含 Null，则返回 Null，如果 number 是未初始化的变量，则返回 0。 说明

一个数的绝对值是将正负号去掉以后的值。例如，ABS(-1) 和 ABS(1) 都返回 1。

Abs 函数示例

本示例使用 Abs 函数计算数的绝对值。 Dim MyNumber

MyNumber = Abs(50.3) ' 返回 50.3。 MyNumber = Abs(-50.3) ' 返回 50.3。

Array 函数

返回一个包含数组的 Variant。 语法

Array(arglist)

所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。 说明

用来表示数组元素的符号由变量名、圆括号以及括号中的所需元素的索引号组成。在下面的示例中，第一条语句创建一个 Variant 的变量 A。第二条语句将一个数组赋给变量 A。最后一条语句将该数组的第二个元素的值赋给另一个变量。 Dim A As V

excel常用函数公式及技巧搜集

【身份证信息相关数据提取】

从身份证号码中提取出生年月日

=TEXT(MID(A1,7,6+(LEN(A1)=18)*2),"#-00-00")+0

=TEXT(MID(A1,7,6+(LEN(A1)=18)*2),"#-00-00")*1

=IF(A2<>"",TEXT((LEN(A2)=15)*19&MID(A2,7,6+(LEN(A2)=18)*2),"#-00-00")+0,) 显示格式均为yyyy-m-d。（最简单的公式，把单元格设置为日期格式）

=IF(LEN(A2)=15,"19"&MID(A2,7,2)&"-"&MID(A2,9,2)&"-"&MID(A2,11,2),MID(A2,7,4)&"-"&MID(A2,11,2)&"-"&MID(A2,13,2))

显示格式为yyyy-mm-dd。（如果要求为“1995/03/29”格式的话，将

常用单位换算公式大全

面积换算

1平方公里（km2）=100公顷（ha）=247.1英亩（acre）=0.386平方英里（mile2）

1平方米（m2）=10.764平方英尺（ft2）

1平方英寸（in2）=6.452平方厘米（cm2）

1公顷（ha）=10000平方米（m2）=2.471英亩（acre）

1英亩（acre）=0.4047公顷（ha）=4.047×10-3平方公里（km2）=4047平方米（m2）

1英亩（acre）=0.4047公顷（ha）=4.047×10-3平方公里（km2）=4047平方米（m2）

1平方英尺（ft2）=0.093平方米(m2)

1平方米（m2）=10.764平方英尺（ft2）

1平方码（yd2）=0.8361平方米（m2）

1平方英里（mile2）=2.590平方公里（km2）

1亩约等于667平方米

1平方公里（km2）=100公顷（ha）约等于1500亩

体积换算

1美吉耳（gi）=0.118升（1） 1美品脱（pt）=0.473升（1）

1美夸脱（qt）=0.946升（1） 1美加仑（gal）=3.785升（1）

1桶（bbl）=0.159立方米（m3）=42美加仑（gal） 1英亩·英尺＝1234立方米（m3）

1立方英寸（in