1、1 VB 中常用的函数和语句一、Val 函数 返回包含于字符串内的数字,字符串中是一个适当类型的数值。 语法 Val(string) 必要的 string 参数可以是任何有效的字符串表达式. 说明 Val 函数,在它不能识别为数字的第一个字符上,停止读入字符串。那些被认为是数值的一部分的符号和字符,例如美圆号与逗号,都不能被识别。但是函数可以识别进位制符号 &O(八进制)和 &H(十六进制)。空白、制表符和换行符都从参数中被去掉。 下面的返回值为 1615198: Val(“ 1615 198th Street N.E.“) 在下面的代码中,Val 为所示的十六进制数值返回十进制数值 -1。
2、Val(“&HFFFF“) 注意 Val 函数只会将句点(.)当成一个可用的小数点分隔符。当使用不同的小数点分隔符时,如在国际版应用程序中,代之以 CDbl 来把字符串转换为数字。 = Val 函数示例 本示例使用 Val 函数返回字符串中所含的数值。 Dim MyValue MyValue = Val(“2457“) 返回 2457。 MyValue = Val(“ 2 45 7“) 返回 2457。 MyValue = Val(“24 and 57“) 返回 24。参考资料:MSDN VB 参考二、Str 函数返回代表一数值的 Variant (String)。 语法Str(number)
3、必要的 number 参数为一 Long,其中可包含任何有效的数值表达式。说明当一数字转成字符串时,总会在前头保留一空位来表示正负。如果 number 为正,返回的字符串包含一前导空格暗示有一正号。使用 Format 函数可将数值转成必要的格式,如日期、时间、货币或其他用户自定义格式。与 Str 不同的是,Format 函数不包含前导空格来放置 number 的正负号。注意 Str 函数只视句点 (.) 为有效的小数点。如果使用不同的小数点(例如,国际性的应用程序),可使用 CStr 将数字转成字符串。for example:Str 函数示例本示例使用 Str 函数来将一个数字转成字符串。当数
4、字转成字符串时,字符串的第一个位一定是空格或是正负号。Dim MyStringMyString = Str(459) 返回 “ 459“。MyString = Str(-459.65) 返回 “-459.65“。MyString = Str(459.001) 返回 “ 459.001“。三、CStr 函数说明传回一个转换为 String 资料型态的运算式。语法CStr(expression) 引数 expression 可以是任何有效的运算式。注解通常,您可以使用资料型态转换函数,以特定的资料型态,取代预设的资料型态来进行运算。例如,使用 CStr 来强制将执行结果以 String 资料型态表
5、示。 您可以使用 CStr 函数而非 Str 函数,在任何语言的版本中,让任何一个资料型态转换至 String 资料型态。例如,不同的小数点分隔符号,会依据您系统的国别设定来做适当的确认。引数 expression 将决定函数传回值为何,请叁考下表:若 expression 内容为 传回值 Boolean 包含 “True“ 或 “False“ 的字串。 Date 包含一个日期的字串,其格式为您系统的简短日期格式。 Null 产生执行时期错误。 Empty 一个长度为 0 的 字串 (“)。 Error 包含一个英文字 “Error“ 以及一个错误代码的字串。 其他数值 包含这个数值的字串。
6、(一)类型转换类函数1. CType(X)格式:P=CBool(X) 将 X 转换为“布尔”(Boolean)类型P=CByte(X) 将 X 转换为“字节”(Byte)类型P=CCur(X) 将 X 转换为“金额”(Currency)类型P=CDate(X) 将 X 转换为“日期”(Date)类型P=CDbl(X) 将 X 转换为“双精度”(Double)类型P=CInt(X) 将 X 转换为“整型”(Integer)类型P=CLng(X) 将 X 转换为“长整型”(Long)类型P=CSng(X) 将 X 转换为“单精度”(Single)类型P=CStr(X) 将 X 转换为“字符串”(S
7、tring)类型P=Cvar(X) 将 X 转换为“变体型”(Variant)类型P=CVErr(X) 将 X 转换为 Error 值 范例 :(1). CStr(13)+CStr(23) 数值转换成字符串后,用“+“号连接, 结果:1323(2). CInt(“12“)+12 字符串转换成整型后与 12 相加, 结果:24(3). P=CInt(True) 输出结果为-1 布尔值与数值的转换时要注意,布尔值只有 True 和 False,其中 True 在内存中为-1,False 存为 0 (4). CBool(-0.001) 输出结果为 True 将数值转换为布尔型时,等于 0 的数值将得
8、到 False,不等于 0 的数值得到 True.2. Int(X),Fix(X):取 X 的整数值格式:P=Int(X) 取0 则 Y=1;X=0 则 Y=0;X 大于 “ABCDE“ABR“ False= 大于等于 “bc“=“大小“ False不等于 “abc“ 字符运算符 关系运算符 逻辑运算符注意:对于存在多种运算符的表达式,可增加圆括号改变优先级或使表达式更清晰。2.3 VB 的公共函数1. 数学函数VB 中常用的数学函数函数名 功能 示例 结果Sqr(x) 求平方根 Sqr(9 ) 3Log(x ) 求自然对数,x0 Log(10) 2.3Exp(x ) 求以 e 为底的幂值,即
9、求 ex Exp(3) 20.086Abs(x ) 求 x 的绝对值 Abs(-2.5) 2.5Hex$(x) 求 x 的十六进制数,返回的是字符型值 Hex$(28 ) “1C“Oct$( x) 求 x 的八进制数,返回的是字符型值 Oct$(10) “12“Sgn(x) 求 x 的符号 , 当 x0, 返回 1 ;x=0, 返回 0; x0, 返回-1 Sgn(15) 1Rnd(x) 产生一个在( 0,1)区间均匀分布的随机数,每次的值都不同;若 x=0,则给出的是上一次本函数产生的随机数 Rnd(x) 0-1 之间的数Sin(x) 求 x 的正弦值,x 的单位是弧度 Sin(0) 0Co
10、s(x) 求 x 的余弦值,x 的单位是弧度 Cos(1) 0.54Tan(x) 求 x 的正切值,x 的单位是弧度 Tan(1) 1.56Atn(x) 求 x 的反正切值,x 的单位是弧度,函数返回的是弧度值 Atn(1) 0.792. 字符函数(1)字符串编码在 Windows 采用的 DBCS(Double Byte Character Set)编码方案中,一个汉字在计算机内存中占 2 个字节,一个西文字符(ASCII 码)占 1 个字节,但在 VB 中采用的是Unicode(ISO 字符标准)来存储字符的,所有字符都占 2 个字节。为方便使用,可以用StrConv 函数来对 Unico
11、de 与 DBCS 进行转换,可以用函数 Len()函数求字符串的字符数,用 LenB()函数求字符串的字节数。(2)常用的字符串函数函数名 功能 示例 结果Len(x ) 求 x 字符串的字符长度( 个数) Len(“ab 技术“) 4LenB(x) 求 x 字符串的字节个数 LenB(“ab 技术“) 8Left(x,n) 从 x 字符串左边取 n 个字符 Left(“ABsYt“,2) “AB“Right(x,n) 从 x 字符串右边取 n 个字符 Right(“ABsYt“,2) “Yt“Mid(x,n1,n2) 从 x 字符串左边第 n1 个位置开始向右取 n2 个字符 Mid(“A
12、BsYt“,2,3) “BsY“Ucase(x) 将 x 字符串中所有小写字母改为大写 Ucase(“ABsYug“) ABSYUGLcase( x) 将 x 字符串中所有大写字母改为小写 Ucase(“ABsYug“ ) absyugLtrim(x) 去掉 x 左边的空格 Lrim(“ ABC “) “ABC “Rtrim(x) 去掉 x 右边的空格 Trim(“ ABC “) “ ABC“Trim(x ) 去掉 x 两边的空格 Trim(“ ABC “) “ABC“Instr(x ,“ 字符 “, M) 在 x 中查找给定的字符, 返回该字符在 x 中的位置,M=1 不区分大小写,省略则区
13、分 Instr(“WBAC“,“B“) 2String(n,“ 字符“) 得到由 n 个首字符组成的一个字符串 String(3,“abcd“) “aaa“Space (n) 得到 n 个空格 Space (3) “Replace(C,C1,C2,N1,N2) 在 C 字符串中从 N1 开始将 C2 替代 N2 次 C1,如果没有 N1 表示从 1 开始 Replace(“ABCASAA“,“A“,“12“,2,2) “ABC12S12A“StrReverse (C) 将字符串反序 StrReverse (“abcd“) “dcba“3. 日期与时间函数常用的日期与时间函数函数名 含义 示例
14、结果Date () 返回系统日期 Date () 02-3-19Time() 返回系统时间 Time() 3:30 :00 PMNow 返回系统时间和日期 Now 02-3-19 3:30 :00Month(C) 返回月份代号(1-12) Month(“02,03,19“) 3Year(C) 返回年代号( 1752-2078) Year(“02-03-19“) 2002Day(C) 返回日期代号(1-31) Day(“02,03,19“) 19MonthName(N) 返回月份名 MonthName(1) 一月WeekDay() 返回星期代号(1-7),星期日为 1 WeekDay(“02,0
15、3,17“) 1WeekDayName(N) 根据 N 返回星期名称, 1 为星期日 WeekDayName(4) 星期三增减日期函数: DateAdd(要增减日期形式,增减量,要增减的日期变量)例:计算期末考试日期:DateAdd(“ww“,15,#2002/3/19#)求日期之差函数: DateDiff(要间隔日期形式,日期一,日期二)例:计算距毕业天数: DateDiff(“d“, Now, #2005/6/30#)日期形式日期形式 yyyy q m y d w ww h n s意义 年 季 月 一年的天数 日 一周的天数 星期 时 分 秒4. 转换函数函数名 功能 示例 结果Str (
16、x) 将数值数据 x 转换成字符串 Str (45.2) “45.2“Val(x) 将字符串 x 中的数字转换成数值 Val(“23ab“) 23Chr(x) 返回以 x 为 ASCII 码的字符 Chr(65) “A“Asc(x) 给出字符 x 的 ASCII 码值,十进制数 Asc(“a“) 97Cint(x) 将数值型数据 x 的小数部分四舍五入取整 Cint(3.6) 4Int(x) 取小于等于 x 的最大整数 Int(-3.5)Int(3.5) -43Fix(x) 将数值型数据 x 的小数部分舍去 Fix(-3.5) - 3CBool(x) 将任何有效的数字字符串或数值转换成逻辑型
17、CBool(2) CBool(“0“) TrueFalseCByte(x) 将 0-255 之间的数值转换成字节型 CByte(6) 6CDate(x) 将有效的日期字符串转换成日期 CDate(#1990,2,23#) 1990-2-23CCur(x) 将数值数据 x 转换成货币型 CCur(25.6) 25.6Round(x,N) 在保留 N 位小数的情况下四舍五入取整 Round(2.86,1) 2.9CStr(x) 将 x 转换成字符串型 CStr(12) “12“CVar(x) 将数值型数据 x 转换成变体型 CVar(“23“)+“A“ “23A“CSng(x) 将数值数据 x 转
18、换成单精度型 CSng(23.5125468) 23.51255CDbl(x) 将数值数据 x 转换成双精度型 CDbl(23.5125468) 23.51254685. 格式输出 Format 函数Format 函数用于制定字符串或数字的输出格式。语法:x = Format (expression, fmt ) expression 是所输出的内容。 fmt 是指输出的格式,这是一个字符串型的变量,这一项若省略的话,那么 Format 函数将和 Str 函数的功能差不多。如:语句 输出Format (2, “0.00”) 2.00 Format (.7, “0%”) 70% Format (
19、1140, “$#,#0”) $1,140 fmt 字符的意义字符 意义 字符 意义0 显示一数字,若此位置没有数字则补 0 . 小数点 # 显示一数字,若此位置没有数字则不显示 , 千位的分隔符 % 数字乘以 100 并在右边加上 ”%”号 - + $ ( ) 这些字出现在 fmt 里将原样打出 Format 函数对时间进行输出时的意义fmt 输出 fmt 输出m/d/yy 8/16/96 h:mm:ss a/p 10:41:29 p d-mmmm-yy 16-August-96 h:mm 22:41 d-mmmm 16-August h:mm:ss 22:41:29 mmmm-yy aug
20、ust-96 m/d/yy h:mm 8/16/96 22:41 hh:mm AM/PM 10:41 PM 6InputBox 函数与 MsgBox 函数(1)InputBox 函数语法:x = InputBox (prompt, title, default, xpos, ypos, helpfile, context)其中,prompt 是提示的字符串,这个参数是必须的。 title 是对话框的标题,是可选的。default 是文本框里的缺省值,也是可选的。xpos,ypos 决定输入框的位置。helpfile,context 用于显示与该框相关的帮助屏幕。返回值 x 将是用户在文本框里输
21、入的数据,x 是一个字符串类型的值。如果用户按了 Cancel 钮,则 x 将为空字符串。(2)MsgBox 函数语法:Action = MsgBox (msg, type, title)数值 符号常量 意义0 vbOKOnly 只显示 Ok 按钮 1 vbOKCancel 显示 Ok Cancel 按钮 2 vbAbortRetryIgnore 显示 Abor Retry Ignore 按钮 3 vbYesNoCancel 显示 Yes No Cancel 按钮 4 vbYesNo 显示 Yes No 按钮 5 vbRetryCancel 显示 Retry Cancel 按钮 16 vbCr
22、itical Stop Sign 对极其重要的问题提醒用户 32 vbQuestion Question Mark 增亮没有危险的问题 48 vbExclamation Exclamation Mark 强调警告用户必须知道的事情 64 vbInformation Information Mark 可以使乏味的信息变得有趣 0 vbDefaultButton1 第一个按钮缺省 256 vbDefaultButton2 第二个按钮缺省 512 vbDefaultButton3 第三个按钮缺省 Action 的值返回值 含义 返回值 含义1 选择 Ok 按钮 5 选择 Ignore 按钮 2 选择
23、 Cancel 按钮 6 选择 Yes 按钮 3 选择 Abort 按钮 7 选择 No 按钮 4 选择 Retry 按钮2 常用函数Abs 函数 返回数的绝对值。 And 运算符 执行两个表达式的逻辑连接。 Array 函数 返回含一数组的 变体 。 Asc 函数 返回字符串首字母的 ANSI 字符代码。 赋值运算符 (=) 给变量或属性赋值。 Atn 函数 返回数的反正切值。 调用语句 将控制移交 Sub 或 Function 过程。 CBool 函数 返回已被转换为 Boolean 子类型的变体的表达式。 CByte 函数 返回已被转换为字节子类型的变体的表达式。 CCur 函数 返回已
24、被转换为货币子类型的变体的表达式。 CDate 函数 返回已被转换为日期子类型的变体的表达式。 CDbl 函数 返回已被转换为双精度子类型的变体的表达式。 Chr 函数 返回指定 ANSI 字符码的字符。 CInt 函数 返回已被转换为整数子类型的变体的表达式。 Class 对象 提供对已创建的类的事件的访问。 Class 语句 声明类名 Clear 方法 清除 Err 对象的所有属性设置。 CLng 函数 返回已被转换为 Long 子类型的变体的表达式。 颜色常数 颜色常数列表。 比较常数 用于比较运算的常数列表。 连接运算符 (&) 强制两个表达式的字符串连接。 Const 语句 声明用于
25、字母值的常数。 Cos 函数 返回角度的余弦值。 CreateObject 函数 创建并返回对“自动” 对象的引用。 CSng 函数 返回已被转换为单精度子类型的变体的表达式。 CStr 函数 返回已被转换为字符串子类型的变体的表达式。 日期和时间常数 在日期和时间运算中用来定义星期几和其他常数的常数列表。 日期格式常数 用于日期和时间格式的常数列表。 Date 函数 返回当前系统日期。 DateAdd 函数 返回加上了指定的时间间隔的日期。 DateDiff 函数 返回两个日期之间的间隔。 DatePart 函数 返回给定日期 的指定部分。 DateSerial 函数 返回指定年月日的 日期
26、子类型的变体 。 DateValue 函数 返回日期子类型的变体 。 Day 函数 返回日期,取值范围为 1 至 31。 Description 属性 返回或者设置说明某个错误的字符串。 Dictionary 对象 存储数据键、项目对的对象。 Dim 语句 声明变量并分配存储空间。 除法运算符 (/) 两数相除并以浮点数格式返回商。 Do.Loop 语句 当条件为 True 或者当条件变为 True 时,重复一语句块。 Empty 表示尚未初始化的变量值。 Eqv 运算符 使两个表达式相等。 Erase 语句 重新初始化固定数组的元素并重新分配动态数组的存储空间。 Err 对象 含有关于运行时
27、错误的信息。 Eval 函数 计算并返回表达式的值。 Execute 方法 根据指定的字符串,执行正则表达式的搜索。 Execute 语句 执行单个或更多的指定语句。 Exit 语句 退出 Do.Loop、For.Next、 Function 或 Sub 代码块。 Exp 函数 返回 e (自然对数的底)的多少次方。 自乘运算符 () 指数函数,幂为自变量。 False 关键字,其值为零。 FileSystemObject 对象 提供对计算机文件系统的访问。 Filter 函数 根据指定的筛选条件 ,返回含有字符串数组子集的、下限为 0 的数组。 FirstIndex 属性 返回字符串匹配的位
28、置。 Fix 函数 返回数的整数部分。 For.Next 语句 以指定的次数重复一组语句。 For Each.Next 语句 对于数组或集合中的每一个元素,重复一组语句。 FormatCurrency 函数 返回的表达式为货币值格式,其货币符号采用系统控制面板中定义的。 FormatDateTime 函数 返回格式化为日期或时间的表达式。 FormatNumber 函数 返回格式化为数的表达式。 FormatPercent 函数 返回格式化为百分比(乘以 100)的表达式,以 % 符号结尾。 Function 语句 声明形成 Function 过程体的名称、参数和代码。 GetObject 函
29、数 从文件返回对“ 自动”对象的访问。 GetRef 函数 返回对可以绑定到事件的过程的引用。 Global 属性 设置或返回 Boolean 值。 Hex 函数 返回表示数的十六进制值的字符串。 HelpContext 属性 设置或返回帮助文件中某主题的上下文 ID。 HelpFile 属性 设置或返回帮助文件的全路径。 Hour 函数 返回小时数,取值范围为 0 至 23。 If.Then.Else 语句 根据表达式的值,有条件地执行一组语句。 IgnoreCase 属性 设置或返回 Boolean 值,指示模式搜索是否区分大小写。 Imp 运算符 执行两个表达式的逻辑隐含。 初始化事件
30、发生在创建相关类的实例时。 InputBox 函数 在对话框中显示提示,等待用户输入文本或者单击按钮,并返回文本框的内容。 InStr 函数 返回一个字符串在另一个字符串中第一次出现的位置。 InStrRev 函数 返回一个字符串在另一个字符串中出现的位置,是从字符串的末尾算起。 Int 函数 返回数的整数部分。 整数除法运算符() 两数相除,返回的商取其整数部分。 Is 运算符 比较两个对象引用变量。 IsArray 函数 返回 Boolean 值,表示变量是否为数组。 IsDate 函数 返回 Boolean 值,表示表达式是否可以转换为日期。 IsEmpty 函数 返回 Boolean
31、值,表示变量是否已被初始化。 IsNull 函数 返回 Boolean 值,表示表达式是否含有无效数据 (Null)。 IsNumeric 函数 返回 Boolean 值,表示表达式能否当作一个数,用来计算。 IsObject 函数 返回 Boolean 值,表示表达式是否引用了有效的“自动” 对象。 Join 函数 返回连接许多包含在一个数组中的子串而创建的字符串。 LBound 函数 对于指示的数组维数,返回最小的可用下标。 LCase 函数 返回已被转换为小写字母的字符串。 Left 函数 返回字符串最左边的指定数量的字符。 Len 函数 返回字符串中的字符数量,或者存储变量所需的字节数
32、。 Length 属性 返回在搜索字符串中匹配的长度。 LoadPicture 函数 返回图片对象。仅用于 32 位平台。 Log 函数 返回数的自然对数。 LTrim 函数 返回去掉前导空格的字符串副本。 Match 对象 提供访问匹配正则表达式的只读属性。 Matches 集合 正则表达式匹配对象的集合。 Mid 函数 从字符串中返回指定数量的字符。 Minute 函数 返回小时内的分钟数,取值范围为 0 至 59。 杂项常数 不能纳入任何其他类的常数列表。 Mod 运算符 两数相除,只返回余数。 Month 函数 返回月份,取值范围为 1 至 12。 MonthName 函数 返回表示月
33、份的字符串。 MsgBox 常数 与 MsgBox 函数一起使用的常数列表。 MsgBox 函数 在对话框中显示消息,等待用户单击按钮,并返回表示用户所击按钮的数值。 乘法运算符 (*) 两数相乘。 取反运算符 (-) 表示数值表达式的相反数。 Not 运算符 执行表达式的逻辑“ 非”运算。 Now 函数 返回当前计算机的系统日期和时间。 Nothing 使对象变量与所有实际的对象没有任何关联。 Null 表示变量含有无效的数据。 Number 属性 返回或设置代表某个错误的数值。 Oct 函数 返回表示一数的八进制值的字符串。 On Error 语句 启用错误处理。 运算符的优先级 表示各种
34、 VBScript 运算符的优先顺序的列表。 Option Explicit 语句 强制显式声明脚本中的所有变量。 Or 运算符 执行两个表达式的逻辑“或” 运算。 Pattern 属性 设置或返回正被搜索的正则表达式的模式。 Private 语句 声明私有变量并分配存储空间。 PropertyGet 语句 声明在窗体属性过程中获取(返回)属性值的名称,参数和代码。 PropertyLet 语句 声明在窗体属性过程中指定属性值的名称,参数和代码。 PropertySet 语句 声明在窗体属性过程中设置引用到对象的名称,参数和代码。 Public 语句 声明公有变量并分配存储空间。 Raise
35、方法 产生运行时错误。 Randomize 语句 初始化随机数发生器。 ReDim 语句 声明动态数组变量,并分配或重新分配过程级的存储空间。 RegExp 对象 提供简单正则表达式的支持。 Rem 语句 包含程序中的注释。 Replace 函数 返回一个字符串,其中某个指定的子串被另一个子串替换,替换的次数也有规定。 Replace 方法 替换在正则表达式搜索中已发现的正文。 RGB 函数 返回表示 RGB 颜色值的数。 Right 函数 返回字符串最右边的指定数量的字符。 Rnd 函数 返回一随机数。 Round 函数 返回指定位数、四舍五入的数。 RTrim 函数 返回去掉尾部空格的字符
36、串副本。 ScriptEngine 函数 返回表示正在使用中的脚本语言的字符串。 ScriptEngineBuildVersion 函数 返回使用中的脚本引擎的编译版本号。 ScriptEngineMajorVersion 函数 返回使用中的脚本引擎的主版本号。 ScriptEngineMinorVersion 函数 返回使用中的脚本引擎的次版本号。 Second 函数 返回时间的秒数,取值范围为 0 至 59。 Select Case 语句 根据表达式的值,在若干组语句中选择一组执行。 Set 语句 将对象引用赋予变量或属性。 Sgn 函数 返回表示数的符号的整数。 Sin 函数 返回角度的
37、正弦值。 Source 属性 返回最早出错的对象或应用程序的名称。 Space 函数 返回由指定数量的空格组成的字符串。 Split 函数 返回下限为 0 的、由指定数量的子串组成的一维数组。 Sqr 函数 返回数的平方根。 StrComp 函数 返回反映字符串比较结果的值。 字符串常数 字符串常数的列表。 String 函数 返回重复的字符串,达到指定的长度。 StrReverse 函数 返回一字符串,其中字符的顺序与指定的字符串中的顺序相反。 Sub 语句 声明形成 Sub 过程体的名称、参数和代码。 减法运算符 (-) 求两数之差,或表示某数值表达式的相反数。 Tan 函数 返回角度的正
38、切值。 终结事件 发生在相关类的实例终结之时。 Test 方法 根据指定的字符串,执行正则表达式的搜索。 Time 函数 返回反映当前系统时间的日期子类型的变体。 Timer 函数 返回时经子夜 12:00 AM 后的秒数。 TimeSerial 函数 返回含有指定时分秒时间的日期子类型的变体。 TimeValue 函数 返回含有时间的日期子类型的变体。 Trim 函数 返回去掉前导空格或末尾空格的字符串副本。 三态常数 在代码中使用,以便表示每个显示的值。 True 其值为 -1 的关键字。 TypeName 函数 返回一字符串,它提供了关于变量的变体子类型信息。 UBound 函数 返回指
39、定维数数组的最大有效下标。 UCase 函数 返回的字符串已经被转换为大写字母。 Value 属性 返回在搜索字符串中已发现匹配的值或正文。 VarType 常数 定义变体子类型的常数列表。 VarType 函数 返回标识变体子类型的数值。 VBScript 常数 在 VBScript 中提供不同种类的常数。 Weekday 函数 返回表示星期几的数值。 WeekdayName 函数 返回表示星期几的字符串。 While.Wend 语句 只要给定的条件为 True,便执行一串语句。 With 语句 对单个的对象执行一串语句。 Xor 运算符 执行两个表达式的逻辑“ 异或”运算。 Year 函数 返回表示年份的数值