vb常用函数 下载本文

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 百分数

format$(\ercent\返回值 10012300.00%

Scientific 科学记数法

format$(\cientific\返回值 1.00E+05

Yes/No 当值为0时返回 NO,否则返回 YES format$(\返回值 Yes

True/False 当值为0时返回 False,否则返回 True format$(\rue/False\返回值 True

On/Off 当值为0时返回 Off,否则返回 On format$(\返回值 On 自定义格式参数

\不进行格式化 返回值 原值

0 占位格式化,不足补0

format$(\返回值 0100123

# 占位格式化,不足时不补0

format$(\返回值 100123

. 强制显示小数点

format$(\返回值 100123.120

% 转化为百分数,一个%代表乘以100 format$(\返回值 1023.00% format$(\返回值 102300.00%%

, 以千为单位格化

format$(\返回值 0 format$(\返回值 10 format$(\返回值 10.01

E- E+ e- e+ 显示为科学记数(要注意格式语句,否则会和E的其它含义相混) Format$(12.5,\+00\返回值 1.25E+01

$ 强制显示货币符号

format$(\返回值 ¥10.23

- + ( ) space 按位置显示本样

Format$(\返回值 -(1234.56)

\\ 转义符,显示出特殊符号

Format$(\返回值 #1234.56

\显示双引号 (\之内的字符串。如在代码中想在 format 中包含一个字符串,必须用 Chr(34) 将文本括起来(34 为双引号 (\

Format$(123.45,\返回值 TTT

注:当双引号中的文本包含特殊的参数符号如e,要使用转义符\,否则会按e的作用显示

; 类似多目运算符的作用。

当共有 四 部分时,

当大于0时,按第一部分进行格式化, 当小于0时按第二部分进行格式化, 当等于0时按第三部分进行格式化, 当为null值时,按第四部分进行格式化。如: Format$(0,\负数;零;空\返回值 零

当共有 三 部分时,

当大于0时,按第一部分进行格式化, 当小于0时按第二部分进行格式化, 当等于0时按第三部分进行格式化,如: Format$(-10,\零\返回值 ttt

当共有 两 部分时,

当大于或等于0时,按第一部分进行格式化, 当小于0时按第二部分进行格式化, Format$(-123,\返回值 abc Format$(123,\返回值 123.00

当共有 一 部分时,按分号左边进行格式化

--------------------------------- 日期类型的格式化 ---------------------------------

注意:在中文操作系统中,系统自动将月份输为如:五月,而非 May

固定格式参数

General Date 基本类型

Format$(Now,\返回值 2006-5-25 14:56:15

Long Date 操作系统定义的长日期

Format$(Now,\返回值 2006年5月25日

Medium Date 中日期(yy/mmm/dd)

Format$(Now,\返回值 06-5月-25

Short Date 操作系统定义的短日期

Format$(Now,\返回值 2006-5-25

Long Time 操作系统定义的长时间

Format$(Now,\返回值 15:06:36

Medium Time 带AM/PM的12小时制,不带秒 Format$(Now,\返回值 03:08 PM

Short Time 24时制的时间,不带秒 Format$(Now,\返回值 15:08

自定义格式参数

: 用来标识时间字符的间隔

Format$(Time(),\返回值 15:25

/ 用来标识日期字符的间隔

Format$(now,\返回值 2006-05-25

c 格式化为国标的日期和时间

Format$(Now,\返回值 2006-5-25 14:56:15

y 一年中的第几天

Format$(Now,\返回值 145

d 一个月中的第几天(1-366) Format$(Now,\返回值 25

dd 当小于10时前面带0的天数(01-31) Format$(\返回值 07

ddd 周几

Format$(Now,\返回值 周四

dddd 星期几

Format$(Now,\返回值 星期四

ddddd 显示标准日期

Format$(Now,\返回值 2006-05-25

dddddd 长日期

Format$(Now,\返回值 2006年5月25日

w 一个星期中的第几天 Format$(Now,\返回值 5

ww 一年中的第几周

Format$(Now,\返回值 21

m 月数(注:当用于时间时,也可以表时为分钟) Format$(Now,\返回值 5 Format$(Now,\返回值 16:11

mm 当小于10时前面带0的月数(注:当用于时间时,也可以表时为带0的分钟) Format$(Now,\返回值 05 Format$(Now,\返回值 16:09

mmm 月份