- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
第四章VBScript脚本语言
第4章 VBScript脚本语言;4.1 VBScript脚本语言概述; VBScript不能用来编写独立运行的应用程序,它必须嵌入到HTML页面中,嵌入时必须使用SCRIPT元素将VBScript代码添加到HTML页面中。;HTML
HEAD
TITLE标题/TITLE
SCRIPT language=VBScript
!--
MsgBox 发表日期输入错误VbCrLf请重新输入
--
/SCRIPT
/HEAD
BODY
/BODY
/HTML ;4.1.2 VBScript和JavaScript;相关性能
;4.2 基本数据类型;4.2.1 使用不同进制的数字;VBScript数据类型的子类型;续表;4.2.5 变量;VBScript声明变量时有两种不同的方式
一种是不用声明变量,直接使用,称为隐式声明;
另一种方式是像其他语言一样先声明变量后使用,称为显式声明。;显式声明的修饰符;固有常量;4.2.5 数组;1.静态数组
静态数组可分为一维数组、二维数组和多维数组。数组的维数和大小由数组名之后紧跟的括号中的数字的个数和数值的大小来决定。静态数组在编译时开辟内存区,因此它的大小在运行时是不可以改变的。
例如,定义一个一维数组arrStudent(3):
Dim arrStudent(3);2.动态数组
动态数组是运行时大小可变的数组。当程序没有运行时,动态数组不占内存,在程序运行时才为其开辟内存区。
动态数组的定义一般分两步:首先用Dim语句声明一个括号内不包含下标的数组,然后在使用数组之前用ReDim语句根据实际需要重新定义下标值。也可以用ReDim语句直接定义数组。
ReDim语句的格式为:
ReDim [Preserve] 变量(下标) ;4.3 表达式和运算符;4.3.1 算术表达式及其运算符;算术运算符;4.3.2 条件表达式及其运算符;4.3.3 字符串表达式;4.3.4 表达式中的优先级;4.4 VBScript中的控制语句;4.4.1 条件控制语句;If表达式1 Then
语句序列1
Else If表达式2 Then
语句序列2
Else If表达式3 Then
语句序列3
…
Else
语句序列n+1
End If;HTML
HEADTITLE选择结构程序举例1/TITLE
SCRIPT language=VBScript
!--
Dim Score
Score=InputBox(请输入计算机成绩,输入成绩)
If (Score=90) then
Msgbox “您的计算机成绩优秀
Else if(score=60) then
Msgbox “您的计算机成绩良好
else
Msgbox 您的计算机成绩不及格
End If
End if
--
/SCRIPT
/HEADBODY……/BODY/HTML
;多分支结构
Select Case 表达式
Case 表达式值表1
语句序列1
Case 表达式值表2
语句序列2
…
Case Else
语句序列n+1
End Select;SCRIPT language=VBScript
!--
Option explicit
Dim nCount, str
nCount=3
Select Case nCount
Case 0
Str=项目
Case 1
Str=论文
Case 2
Str=著作
Case 3
Str=获奖
End select
Msgbox str
--/SCRIPT ;MsgBox 星期一
case 2
MsgBox 星期二
case 3
MsgBox 星期三
case 4
MsgBox 星期四
case 5
MsgBox 星期五
case 6
MsgBox 星期六; case 7
MsgBox 星期日
case else
MsgBox 请输入1-7中的数字!
end select
End Sub
call ShowMessage 调用ShowMessage 过程
/SCRIPT
/HEADBODY
……
/BODY/HTML;4.4.
您可能关注的文档
最近下载
- 时间域激电中梯、测深作业指导书.pdf VIP
- 2025年水利工程监理工作报告.pdf VIP
- 激电中梯、激电测深工作概要.pptx VIP
- 药物分析与常用组学技术在药学服务中的应用题库答案-2025年华医网继续教育.docx VIP
- 2025年杭州临安区公开招聘专职社区工作者和两新专职党务工作者35人笔试参考题库附答案解析.docx VIP
- 蒸馏法海水淡化阻垢剂性能评价方法 动态模拟试验法 编制说明.pdf VIP
- 无障碍设计PPT课件.ppt VIP
- CTD格式申报资料(原料药)新.pdf VIP
- 中小学心理健康教育指导纲要考试试题及答案.docx VIP
- 《无障碍设计原则》课件.ppt VIP
文档评论(0)