VBA中处理字符串常用函数(3)

2019-08-30 18:18

hh

元素:小时

显示:00~23范围内的一个数字,有前导0。 范例:Format(\返回:05 n

元素:分

显示:0~59范围内的一个数字,无前导0。 范例:Format(\返回:8 nn

元素:分

显示:00~59范围内的一个数字,有前导0。 范例:Format(\返回:08 s

元素:秒

显示:0~59范围内的一个数字,无前导0。 范例:Format(\返回:6 ss

元素:秒

显示:00~59范围内的一个数字,有前导0。 范例:Format(\返回:06 ttttt

元素:时间

显示:基于12小时制的时间,包含Windows区域设置中指定的时间分隔符和前导0。 范例:Format(\返回:5:08:06 AM/PM 元素:时间

显示:用大写的AM和PM表示的12小时制的时钟格式。 范例:Format(\返回:05:08:06 PM am/pm

元素:时间

显示:用小写的am和pm表示的12小时制时钟格式。 范例:Format(\返回:05:08:06 pm A/P

元素:时间

显示:12小时制时钟格式,用大写“A”表示AM,大写“P”表示PM。 范例:Format(\

返回:05:08:06 P a/p

元素:时间

显示:12小时制时钟格式,用小写“a”表示am,小写“p”表示pm。 范例:Format(\返回:05:08:06 p :

元素:时间分隔符 显示:时间格式

范例:Format(\返回:17:08:06 w

元素:星期几

显示:1~7范围内的一个数字(1~7分别表示星期天到星期六)。 范例:Format(\返回:6 ww

元素:周

显示:1~54范围内的一个数字。 范例:Format(\返回:5 m

元素:月

显示:1~12范围内的一个数字,无前导0。 范例:Format(\返回:2 mm

元素:月

显示:01~12范围内的一个数字,有前导0。 范例:Format(\返回:02 mmm

元素:月

显示:英文月份简写(Jan~Dec)

范例:Format(\返回:Feb mmmm 元素:月

显示:英文月份全称(January~December) 范例:Format(\返回:February q

元素:季度

显示:1~4范围内的一个数字

范例:Format(\返回:1 y

元素:一年中的某天

显示:1~366范围内的一个数字。 范例:Format(\返回:33 yy

元素:年

显示:00~99范围内的一个两位数字。 范例:Format(\返回:07 yyyy

元素:年

显示:100~9999范围内的一个四位数字。 范例:Format(\返回:2007

(7)用于创建用户自定义数字格式的字符 0

说明:数字占位符。如果参数expression所代表的数值在相应的0位置上有一个数字,则显示这个数字,否则显示0。所指定的小数点后的位数,使数值舍入为给定的小数位数,但不影响小数点左边的数字位数。

范例1:Format(23.675,\ 返回:23.6750 范例2:Format(23.675,\ 返回:23.68 范例3:Format(2345,\ 返回:02345 范例4:Format(2345,\ 返回:2345.00 #

说明:数字占位符。如果参数expression所代表的数值在相应的#位置上有一个数字,则显示这个数字,否则什么也不显示。

范例1:Format(23.675,\ 返回:23.68 范例2:Format(23.675,\ 返回:23.675

范例3:Format(12345.25,\ 返回:12,345.25 .

说明:小数点占位符。小数点占位符实际显示的字符由本机Windows系统国际设置格式决定。 %

说明:百分数占位符。首先将参数expression所代表的数值乘以100,然后把它作为百分数显示。

范例:Format(0.25,\返回:25.00% ,

说明:千位分隔符。实际显示的字符由本机Windows系统国际设置格式决定。在格式定义中只需要给出一个千位分隔符。

范例:Format(1000000,\ 返回:1,000,000 E-E+ e-e+

说明:科学计数法格式。如果格式表达式在E-、E+或e-、e+的右边至少有一个数字占位符(0或#),数字就以科学计数法格式显示数字,参数Format中所用的字母E或e在该数字和它的指数之间显示。右边的数字占位符数目决定了要在指数中显示的位数。使用E-或e-可以在负指数前插入一个减号,使用E+或e+可以在正指数前插入一个正号。 范例:Format(1.09837555,\ 返回:109838E-5 -+$

说明:显示一个直接量字符。

范例:Format(2345.25,\ 返回:$2,345.25 \\

说明:反斜杠后的字符以直接量字符显示。可以用反斜杠将某个特定格式的字符以直接量字符显示。

范例:Format(0.25,\ 返回:.25% (8) 用于创建用户自定义字符串格式的字符 @

说明:字符占位符。如果expression在相应的@位置上有一个字符,就显示这个字符,否则显示一个空格。

范例:Format(\ 返回:* * VBA &

说明:字符占位符。如果expression在相应的&位置上有一个字符,就显示这个字符,否则什么也不显示。

范例:Format(\ 返回:**VBA <

说明:用小写形式显示所有字符。 范例:Format(\ 返回:vba >

说明:用大写形式显示所有字符。 范例:Format(\ 返回:VBA !

说明:从左向右处理占位符(缺省情况为从右向左处理占位符)。 [编程方法和技巧]

(1) 使用没有格式定义的Format函数格式化数字比使用Str函数格式化数字更好。Format函数与Str函数不同,它会把正数中一般保留用于表示符号的前导空格清除掉。

(2) 可以使用Format函数以1000为单位对数字进行标度,做法是在语句中小数点的左边用一个千位分隔符(,)表示标度数字的一个千位;可以使用多个千位分隔符。例如: Format(1000000,\返回:1000. Format(1000000,\ 返回:1.

2.6 查找字符串

2.6.1 InStr函数

可使用InStr函数返回一字符串在另一字符串中的位置,

因此,也可以使用该函数确定一个字符串中是否包含有另一个字符串。其语法为: InStr([Start,]string1,string2[,compare])

其中,参数Start为可选参数,设置查找的起点,如果省略,则从第一个字符的位置开始查找,当指定了参数Compare时,则要指定此参数。 参数string1为被查找的字符串,

参数string2为要查找的字符串,这两个参数都是必需的。 如果在String1中没有找到String2,返回0;

如果找到String2,则返回String2第一个出现的首字符位置(即1到String1的长度); 如果String2的长度为零,返回Start。 可看看下面的示例:

Sub test()

Dim SearchString, SearchChar, MyPos

SearchString = \ '被搜索的字符串 SearchChar = \ '要查找字符串 \

'从第四个字符开始,以文本比较的方式找起,返回值为 6(小写 p) '小写 p 和大写 P 在文本比较下是一样的 MyPos = InStr(4, SearchString, SearchChar, 1) Debug.Print MyPos

'从第一个字符开使,以二进制比较的方式找起,返回值为 9(大写 P) '小写 p 和大写 P 在二进制比较下是不一样的 MyPos = InStr(1, SearchString, SearchChar, 0) Debug.Print MyPos

'缺省的比对方式为二进制比较(最后一个参数可省略) MyPos = InStr(SearchString, SearchChar) '返回 9 Debug.Print MyPos

MyPos = InStr(1, SearchString, \ '返回 0 Debug.Print MyPos End Sub

2.6.2 InStrRev函数

也可以使用InStrRev函数返回一个字符串在另一个字符串中出现的位置,与InStr函数不同的是,从字符串的末尾算起。其语法为: InStrRev(String1,String2[,[Start[,compare])

参数String1为被查找的字符串,参数String2为要查找的字符串,这两个参数都是必需的。参数Start为可选参数,设置每次查找开始的位置,若忽略则使用-1,表示从上一个字符位置开始查找。参数Compare为可选参数,表示所使用的比较方法,如果忽略则执行二进制比较。

下面的示例使用了InStr函数和InStrRev函数,相应的结果不同: Sub test()

Dim myString As String


VBA中处理字符串常用函数(3).doc 将本文的Word文档下载到电脑 下载失败或者文档不完整,请联系客服人员解决!

下一篇:2016年高考英语二轮复习专题(江苏专用):题型组合练(3)

相关阅读
本类排行
× 注册会员免费下载(下载后可以自由复制和排版)

马上注册会员

注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信: QQ: