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