WEB开发技术第二章 0sc简介 23VBS重要函数 From:吴教育 Email wujiaoyu@21cn.com QQ:188128997 东料学枝术取业学院
WEB开发技术 第二章 2.3 VBS重要函数 From：吴教育 Email： wujiaoyu@21cn.com Q Q: 188128997
课程引入与回顾 Vbscript的基本语法 条件语句。。 循环语句 VBScript过程 东料学枝术取业学院
课程引入与回顾 • Vbscript的基本语法 • 条件语句 • 循环语句 • VBScript 过程
目标 掌握 Vbscript常见函数的用法,包括: 转换函数 输入喻输出函数 一字符串函数(重点) 日期与时间函数 常用数学函数 检验函数 东料学枝术取业学院
目标 • 掌握Vbscript常见函数的用法,包括： – 转换函数 – 输入/输出函数 – 字符串函数（重点） – 日期与时间函数 – 常用数学函数 – 检验函数
转换函数 在使用过程中, Variant变量一般会根据需 要自动转换成合适的数据类型;但有时, 自动转换有可能造成数据类型不匹配错误 。此时,就应使用 VBScript的转换函数来强 制转换数据的子类型。 Num=1000 StrWelcom=“欢迎第”&cSt(Num)8"个来访者 %> 东料学枝术取业学院
转换函数 • 在使用过程中，Variant变量一般会根据需 要自动转换成合适的数据类型；但有时， 自动转换有可能造成数据类型不匹配错误 。此时，就应使用VBScript的转换函数来强 制转换数据的子类型
转换函数(续) 函数 功能 CStr(Variant)。将变量 Varian转换为字符串类型 CDate(Variant将变量 Variant转换为日期类型 Cn( Variant)将变量 Variant转换为整数类型 CLng( Variant)将变量 Variant转换为长整数类型 csng( variant)将变量 Variant转换为 Single类型 cDb(aran)将变量 Variant转换为 Double类型 CBool(Varian将变量laan转换为布尔类型 东料学枝术取业学院
转换函数(续) 函 数 功 能 CStr(Variant) 将变量Variant转换为字符串类型 CDate(Variant) 将变量Variant转换为日期类型 CInt(Variant) 将变量Variant转换为整数类型 CLng(Variant) 将变量Variant转换为长整数类型 CSng(Variant) 将变量Variant转换为Single类型 CDbl(Variant) 将变量Variant转换为Double类型 CBool(Variant) 将变量Variant转换为布尔类型
Asc函数示例 下面例子中,ASc返回每一个字符串首字母 的ANS|字符代码 Dim MyNumber MyNumber=Asc(A")返回65。 MyNumber=Asc(a")返回97。 MyNumber=Asc("Appe")返回65 广东科学技木职业学院
Asc 函数示例 • 下面例子中, Asc 返回每一个字符串首字母 的 ANSI 字符代码: – Dim MyNumber – MyNumber = Asc(“A”) ‘返回 65。 – MyNumber = Asc(“a”) ‘返回 97。 – MyNumber = Asc("Apple") '返回 65
Chr函数示例 下面例子利用chr函数返回与指定的字符 代码相对应的字符: Dim MaChar My Char=chr(65)返回A MyChar=chr(97)返回a My Char=chr(62)返回>。 MyChar=chr(37)返回% 广东科学技木职业学院
Chr 函数示例 • 下面例子利用 Chr 函数返回与指定的字符 代码相对应的字符: – Dim MyChar – MyChar = Chr(65) '返回 A。 – MyChar = Chr(97) '返回 a。 – MyChar = Chr(62) ‘返回 >。 – MyChar = Chr(37) '返回 %
cstr函数示例 ·CSt将变量num1由整数子类型强制转换为 字符串子类型 东料学枝术取业学院
CStr 函数示例 • CStr将变量num1由整数子类型强制转换为 字符串子类型 –
CDate函数示例 MyDate=“ October19,1962”‘定义日期。 MyShortDate= C Date( MyDate)‘转换为日期 数据类型。 - MyTime=“4:35:47PM” 定义时间。 MyShortT ime= CDate( MyT ime)"转换为日期 数据类型。 东料学枝术取业学院
CDate 函数示例 – MyDate = “October 19, 1962” ‘ 定义日期。 – MyShortDate = CDate(MyDate) ‘ 转换为日期 数据类型。 – MyTime = “4:35:47 PM” ‘ 定义时间。 – MyShortTime = CDate(MyTime) ' 转换为日期 数据类型
CInt函数示例 Dim MyDouble, Mylnt MyDouble 2345.5678 MyDouble是 Double Mynt=cnt( My Double)'Mynt包含2346 东料学枝术取业学院
CInt 函数示例 – Dim MyDouble, MyInt – MyDouble = 2345.5678 ' MyDouble 是 Double。 – MyInt = CInt(MyDouble) ' MyInt 包含 2346