通行证: 用户 密码 域名空间  下载中心 社区论坛 信息公告 my小屋
联系我们
设为首页
加入收藏

 

qq,asp,php,jsp,xml,sql,.net,编程 程序 网页图象 建站经验 私服
首页 | 新闻资讯 | 编程开发 | 网页设计 | 图形图象 | 网络媒体 | 网站模板 | 数 据 库 | 投稿
论坛 | 操作系统 | 系统优化 | 网络安全 | 黑客技术 | 硬件学堂 | 硬件报价 | 服 务 器 | 地图
专题 | 应用软件 | 聊天通讯 | q q 专栏 | 建站经验 | 在线工具 | 站长club | 注 册 表 | 旧版
社会 | 游戏娱乐 | 设计欣赏 | 疑难解答 | 社区论坛 | 网络赚钱 | 网站地图 | 广告服务 | 服务
当前位置:首页>>网页设计>>网页特效>>正文 新版上线![旧版]
注:打开慢时请稍等
vbscript教程 第七课

http://www.iyit.net  日期:2006-5-5 9:59:22  来源:中国站长学院  点击:
参加讨论】控制程序执行

使用条件语句和循环语句可以控制 script 的流程。使用条件语句可以编写进行判断和重复操作的 vbscript 代码。在 vbscript 中可使用以下条件语句:

· if...then...else 语句
· select case 语句

使用 if...then...else 进行判断

if...then...else 语句用于计算条件是否为 true 或 false,并且根据计算结果指定要运行的语句。通常,条件是使用比较运算符对值或变量进行比较的表达式。有关比较运算符的详细信息,请参阅比较运算符。if...then...else 语句可以按照需要进行嵌套。

条件为 true 时运行语句

要在条件为 true 时运行单行语句,可使用 if...then...else 语句的单行语法。下例示范了单行语法。请注意此例省略了关键字 else。

sub fixdate()
dim mydate
mydate = #2/13/95#
if mydate < now then mydate = now
end sub

要运行多行代码,必须使用多行(或块)语法。多行(或块)语法包含 end if 语句,如下所示:

sub alertuser(value)
if value = 0 then
alertlabel.forecolor = vbred
alertlabel.font.bold = true
alertlabel.font.italic = true
end if
end sub

条件为 true 和 false 时分别运行某些语句

可以使用 if...then...else 语句定义两个可执行语句块:条件为 true 时运行某一语句块,条件为 false 时运行另一语句块。

sub alertuser(value)
if value = 0 then
alertlabel.forecolor = vbred
alertlabel.font.bold = true
alertlabel.font.italic = true
else
alertlabel.forecolor = vbblack
alertlabel.font.bold = false
alertlabel.font.italic = false
end if
end sub

对多个条件进行判断

if...then...else 语句的一种变形允许您从多个条件中选择,即添加 elseif 子句以扩充 if...then...else 语句的功能,使您可以控制基于多种可能的程序流程。例如:

sub reportvalue(value)
if value = 0 then
msgbox value
elseif value = 1 then
msgbox value
elseif value = 2 then
msgbox value
else
msgbox "数值超出范围!"
end if

可以添加任意多个 elseif 子句以提供多种选择。使用多个 elseif 子句经常会变得很累赘。在多个条件中进行选择的更好方法是使用 select case 语句。

使用 select case 进行判断

select case 结构提供了 if...then...elseif 结构的一个变通形式,可以从多个语句块中选择执行其中的一个。select case 语句提供的功能与 if...then...else 语句类似,但是可以使代码更加简练易读。

select case 结构在其开始处使用一个只计算一次的简单测试表达式。表达式的结果将与结构中每个 case 的值比较。如果匹配,则执行与该 case 关联的语句块:

select case document.form1.cardtype.options(selectedindex).text
case "mastercard"
displaymclogo
validatemcaccount
case "visa"
displayvisalogo
validatevisaaccount
case "american express"
displayamexcologo
validateamexcoaccount
case else
displayunknownimage
promptagain
end select

请注意 select case 结构只计算开始处的一个表达式(只计算一次),而 if...then...elseif 结构计算每个 elseif 语句的表达式,这些表达式可以各不相同。仅当每个 elseif 语句计算的表达式都相同时,才可以使用 select case 结构代替 if...then...elseif 结构。

编辑:黑鹰 [发送给好友] [打印本页] [关闭窗口] [返回顶部]
上一篇:自适应图片大小的弹出窗口
下一篇:vbscript教程 第八课
转载请注明来源:www.iyit.net
特别声明: 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员,我们尽快予以更正。

 相关文章
vbscript超强幻灯片效果代码 vbscript教程 第六课 vbscript教程 第五课
vbscript教程 第四课 vbscript教程 第三课 vbscript教程 第二课
vbscript教程 第一课 vbscript教程 目录 vbscript教程 第十四课
vbscript教程 第十三课 vbscript教程 第十二课 vbscript教程 第十一课
vbscript教程 第十课 vbscript教程 第九课 vbscript教程 第八课
vbscript 编码约定                    vbscript 过程                        vbscript 运算符                     
vbscript 常数                        vbscript 变量                        vbscript 数据类型                   
什么是 vbscript?                    vbscript和javascript互相调用  vbs类生成xml文件
最新更新 热点排行 推荐新闻
javascript实例教程(3-2)
javascript实例教程(3-1)
javascript实例教程(2) 创建弹出式窗
javascript实例教程(1) 目录
荧光文字
javascript实例教程(3-2)
javascript实例教程(3-1)
javascript实例教程(2) 创建弹出式窗
javascript实例教程(1) 目录
荧光文字
鼠标周围的文字宣传
随鼠标的闪烁小星星
鼠标右键显隐效果
状态栏特效
自动关闭弹出式窗口
javascript实例教程(3-2)
javascript实例教程(3-1)
javascript实例教程(2) 创建弹出式窗
javascript实例教程(1) 目录
荧光文字
qq珊瑚虫外挂4.0版本发布!
多个广告位招商!
摄影后期系列一:1分钟为数码相片去红眼
qq挂机说明
asp进度条
photoshop通道抠图:给秀发飞扬的mm照
教您显示器亮度对比度的调节
新版上线,今日正式开通!!!
更多精彩图文广告等着您!
asp中使用sql语句教程
第二十章 开发delphi对象式数据管理功
sql简明教程(1)
vbscript和javascript互相调用 
jsp教程(四)-jsp actions的使用
操作系统被入侵后的修复过程
五一别忘电脑防毒 养成良好上网习惯
google对ie浏览器将捆绑搜索功能表担忧
新版上线,今日正式开通!!!
用photoshop创意图形“岁月”
摄影后期系列一:1分钟为数码相片去红眼

 友情链接
设置首 页 - 版权声明 - 广告服务 - 关于我们 - 联系我们 - 友情连接
copyrights © 2004-2006 iyit.net all rights reserved.
网站合作、广告联系qq:147007642、466949678
易特网络技术 点击这里给我发消息