VBA的Format函数_第1页
VBA的Format函数_第2页
VBA的Format函数_第3页
VBA的Format函数_第4页
VBA的Format函数_第5页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、Format(值,格式(可选参数)一、数字格式:1、General Number:普通数字,可以用来去掉千位分隔号和无效 0 。如:Format("1,234,567.80", "General Number")="1234567.8"2、Currency:货币类型,可添加千位分隔号和货币符号,保留两位小数点。如:Format(1234567, "Currency")="¥1,234,567.00"3、Fixed:格式为带两位小数的数字。如:Format("123456

2、", "Fixed")=123456.004、Standard:标准,即带千位分隔号和两位小数。如:Format("123456", "Standard")=123,456.005、Percent:带两位小数点的百分数。如:Format("123456", "Percent")=12345600.006、Scientific:科学记数法。如:Format("1234567", "Scientific")=1.23E+067、Yes/No:当数值为

3、非 0 数字时返回 Yes ,否则返回 No 。如:Format(-3.14, Yes/No")="Yes"    Format(0, "Yes/No")="No"8、True/False:当数值为非 0 数字时返回 True ,否则返回 False 。与第7点类似,这里不再举例。9、On/Off:当数值为非 0 数字时返回 On ,否则返回 Off 。与第7点类似,这里不再举例。10、""或省略:返回原值,但去除了小数点前后的无效 0 。如:Format("0.1

4、030", "")=".103"11、0:占位格式化,不足位时补足 0 。如:Format(123, 0000")="0123"    Format$(12.3, "0.00")="12.30"12、#:占位格式化,不足位时不补足 0 。如:Format(123, "#")=12313、%:转化为百分数,一个%代表乘以 100 。如:Format(1.23, "0.00%")=123.00% &#

5、160;  Format(1.23, "0.00%")=12300.00%14、:强制显示某字符。如:Format$(12.34, "RMB .00")="RMB 12.34"15、;(分号):分段显示不同格式比如要把正数显示为“正”,负数显示为“负”,0显示为“零”,参数为"正;负;零"如:Format$(123, "正;负;零")="正"第1段为正数格式,第2段为负数格式,第3段为0格式。二、日期和时间格式:1、固定格式参数General Date:基本类型如:

6、Format("2010-5-1 9:8:5", "General Date")="2010/5/1 9:08:05"Long Date:操作系统定义的长日期如:Format("2010-5-1 9:8:5", "Long Date")=2010年5月1日Medium Date:中日期如:Format("2010-5-1 9:8:5", "Medium Date")=10-05-01Short Date:操作系统定义的短日期如:Format("2

7、010-5-1 9:8:5", "Short Date")=2010-5-1Long Time:操作系统定义的长时间如:Format("2010-5-1 9:8:5", "Long Time")=9:08:05Medium Time:带AM/PM(上午/下午)的12小时制,不带秒如:Format("2010-5-1 9:8:5", "Medium Time")=09:08 上午Short Time:24时制的时间,不带秒如:Format("2010-5-1 9:8:5&quo

8、t;, "Short Time")=09:082、自定义格式C:格式化为国标的日期和时间如:Format("2010-5-1 9:8:5", "c")=2010/5/1 9:08:05y:一年中的第几天(1-366)如:Format("2010-5-1 9:8:5", "y")=121yy:两位数的年份(00-99)如:Format("2010-5-1 9:8:5", "yy")=10yyy:上面的 yy 与 y 结合在一起如:Format(2010-5-

9、1 9:8:5", "yyy")=10121    Format("2010-5-1 9:8:5", "yy年第y天")=10年第121天yyyy:四位数的年份(0100-9999)如:Format("2010-5-1 9:8:5", "yyyy")=2010d:一个月中的第几天(1-31)如:Format("2010-5-1 9:8:5", "d")=1dd:与 d 相同,但不足两位时补足 0如:Format(&q

10、uot;2010-5-1 9:8:5", "dd")=01ddd:三个英文字母表示的星期几如:Format("2010-5-1 9:8:5", "ddd")="Sat"dddd:英文表示的星期几如:Format("2010-5-1 9:8:5", "dddd")="Saturday"ddddd:显示标准日期如:Format("2010-5-1 9:8:5", "ddddd")=2010/5/1dddddd:

11、长日期如:Format("2010-5-1 9:8:5", "dddddd")=2010年5月1日w:一个星期中的第几天(始于周日,周日为1)如:Format("2010-5-1 9:8:5", "w")=7ww:一年中的第几周如:Format("2010-5-1 9:8:5", "ww")=18m:月份数(当用于时间时,也可以表时为分钟)如:Format("2010-5-1 9:8:5", "m")=5mm:当小于10时带前导0的月数

12、(当用于时间时,也可以表示为两位数的分钟数)如:Format("2010-5-1 9:8:5", "mm")=05mmm:三个英文字母表示的月份数如:Format("2010-1-1 9:8:5", "mmm")="Jan"mmmm:英文表示的月份数如:Format("2010-1-1 9:8:5", "mmmm")="January"q:一年中的第几季(1-4)如:Format("2010-5-1 9:8:5",

13、"q")=2aaa:中文表示的周几如:Format("2010-5-1 9:8:5", "aaa")=周六aaaa:中文表示的星期几如:Format("2010-5-1 9:8:5", "aaaa")=星期六h:小时数(0-23)如:Format("2010-5-1 9:8:5", "h")=9h:两位数表示的小时数如:Format("2010-5-1 9:8:5", "hh")=09n:分钟数(0-59)如:For

14、mat("2010-5-1 9:8:5", "n")=8nn:两位数表示的分钟数(00-59)如:Format("2010-5-1 9:8:5", "nn")=08s:秒数(0-59)如:Format("2010-5-1 9:8:5", "s")=5ss:两位数表示的秒数(00-59)如:Format("2010-5-1 9:8:5", "ss")=05ttttt:标准时间,当小时数小于10时不带0,与 h:mm:ss 或 h:nn:s

15、s 相同如:Format("2010-5-1 9:8:5", "ttttt")=9:08:05AM/PM:显示当前为AM或PM如:Format("2010-5-1 11:59:59", "AM/PM")=AM    Format("2010-5-1 12:0:0", "AM/PM")=PMA/P:显示当前为A或P与 AM/PM 一样,这里不再举例。说明:可以多种格式联合使用,如:Format("2010-5-1 9:8:5",

16、 "dddddd aaaa")=2010年5月1日 星期六三、文本格式:匹配位置插入格式化文本,如:在"abcde"前插入文本"X",代码为:Format("abcde", "X")=Xabcde">X")=Xabcde在"abcde"第1位字符后面插入文本"X",代码为:Format("abcde", "X")=aXbcde在"abcde"第2位字符后面插入文本&quo

17、t;X",代码为:Format("abcde", "X")=abXcde在"abcde"第3位字符后面插入文本"X",代码为:Format("abcde", "X")=abcXde当点位符比原文本字符串多时,刚在相应位置上添加空格,如:Format("abc", "X")="X">X")="X abc"Format("abc", "X&quo

18、t;)="X">X")="X  abc"Format("t", "a")="  at"(空格空格at)与!配合可从后面截取一段文本,如:截取"abcde"后面1个字符文本,代码为:Format("abcde", "!")=e">!")=e截取"abcde"后面2个字符文本,代码为:Format("abcde", "!")=de">!")=de截取"abcde"后面3个字符文本,代码为:Format("abcde", "!")=cde">!")=cde截取"abc

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论