网络数据库应用教程全套PPT电子课件教案- 第11章 VBScript 脚本语言.pptVIP

% else % 晚上好！ br % end if end if % /BODY /script /HTML 程序中在%%范围内的是脚本语言，在该范围之外的是按HTML规范给出的页面格式或内容。 2．字符串处理函数 VBScript中用于字符串处理的函数比较多，表11-4只是最常用的几个字符串处理函数。 3．类型转换函数 类型转换函数的作用是将一种数据类型转换为另一种类型。表11-5列出常用的类型转换函数，其中的Experssion是合法的数据类型的表达式。 4．MsgBox 函数 MsgBox是消息框函数。MsgBox函数最简单的用法是在消息框中显示一段提示信息及一个“确定”按钮。待使用者单击“确定”按钮后，程序继续执行MsgBox 函数之后的语句。 消息框中出现的按钮数量和按钮所执行的操作可以根据具体要求设定。 MsgBox 函数的基本语法格式如下： MsgBox (提示[，按钮][，标题][，帮助文件，上下文] ) 其中的“提示”是出现在消息框中的提示信息，“按钮”指明了消息框中按钮的类型，包括两部分内容：按钮的名称和消息框中图标的类型。有关参数类型的含义及值见表11-6。 例11.3　通过实例说明MsgBox 函数中按钮和图标类型参数的使用。 建立一个HTML文件，清单如下： %@ Language=VBScript% HTML % Msgbox 选择不同的按钮类型!,vbYesNo,按钮类型 % /script /HTML 通过函数的返回值可以知道操作者选中的按钮。我们可以根据返回的参数进行下一步处理。Msgbox函数返回值的含义见表11-7。 5．InputBox函数 InputBox是输入对话框函数，其作用是显示一个输入对话框，等待输入文本或者选择输入对话框上的某个按钮。InputBox函数的返回值是文本框中输入的内容。 InputBox函数的一般格式如下： InputBox(提示[，标题][，默认值][，x][，y] ) 例11.4　使用InputBox输入一个数值，默认值为10。 编写HTML代码如下。 HTML Script Language=VBSCRIPT !-- Do a=Inputbox(请输入一个数字,测试InputBox,10) Loop Until Isnumberic(a) -- / Script /HTML 11.3　流 程 控 制 11.3.1　条件语句 单行条件语句的语法格式如下。 If 条件表达式 Then 语句1 [Else 语句2] 多行形式的条件语句格式如下。 If 条件表达式1 Then 语句1 [Elseif 条件表达式2 Then [语句2] [Else 语句3] End If 例11.5　利用函数varType判断变量的数据类型，并给出相应的提示。 程序如下。 %@ Language=VBScript % HTML TITLE IF 语句的使用/TITLE BODY % Dim var1 var1=1 if VarType(var1)=vbInteger then% 变量中保存的是整数！ %elseif VarType(var1)=vbString then% 变量中保存的是字符串！ %else% 变量中保存的不是整数和字符串！ %end if% /BODY /HTML 11.3.2　选择结构 Select Case 语句的基本格式如下。 Select Case 表达式 [Case 值1 [语句1]] … … [Case 值n [语句n]] [Case Else [语句n+1]] End Select 如果表达式的值与某个Case语句的值相匹配，执行该Case语句之后的语句序列，直到下一个Case语句。如果表达式的值与多个Case语句相匹配，则仅执行第一个与之匹配的Case语句之后的语句；如果表达式的值与所有Case语句的值都不匹配，则执行Case Else 语句之后的语句。 例11.6　用Case结构实现【例11-5】的功能。 程序清单如下。 %@ Language=VBScript % HTML TITLECase 语句的使用/TITLE BODY % Dim var1 var1=Example Select Case VarType(var1) case vbInteger % 变量中保存的是整数！ %case vbString % 变量中保存的是字符串！ %Case else% 变量中保存的不是整数和字符串！ %