8年网站建设、推广经验!服务客户2000+
微信关注
扫一扫,享优惠!
咨询电话:400-888-2014;座机:029-81627176;手机/微信:153 5370 4270
建站技术

您现在的位置:主页 > 心海资讯 > 建站技术 >

  • 推荐文章
  • 一般企业网站的改版目的
    一般企业网站的改版目的 网站改版对于搜索引擎优化肯定石油一定的影响,但是为了 企业网站 的长久发展还是不得不选择改版。那么如何降低改版对搜索引擎排名的影响是重要的......
    201207/09
  • 心海网络文化
    1.企业寓意:心若大海 网络无极 2.企业宗旨:快乐工作 快乐赚钱 快乐生活 3.团队口号:同心同德群策群力共同致力于企业发展 4.企业使命:与客户同步成长,为客户创造价值 5......
    201211/10
  • 西安网站优化五点建议
    网站的长尾关键词几乎是每个SEO都知道的事,可重视度几乎被很多站长忽视掉,越是大型门户型网站,长尾关键词的搜索量占比重越高。 这也是为什么很多SEO一直在呼喊要重视长......
    201310/21
  • q0116西安乐器制造企业网
    Q0116西安乐器制造企业网站建设 关键词: 西安乐器制造企业网站制作 本公司1995年成 立,自成立起备受顾客们的青睐,在国内建立了多家大型的代理店,出口世界多个国家,生......
    201204/05
  • 西安政府网站建设方案
    政府网站建设方案 我是搞网络的我的答案不是很专业,但希望对你有用。 一、概述 信息网络正在成长为第四媒体,将成为人们获得信息和实现和社会各多种功能的主要载体,因而......
    201301/27
  • 万网向个人开放国内域名
    万网向个人开放国内域名注册 2012年5月29日CNNIC公布cn域名面向自然人开放注册 个人持身份证即可注册cn域名 与.com相比,.cn域名资源更加丰富 域名付款成功后,需1天内在会......
    201206/15
  • 相关文章
  • vbscript中三元操作符的使用
    vbscript中三元操作符的使用 关键词: vbscript中三元操作符怎么使用,vbscript中三元操作符的用法案例 条件判断的使用: A2 ? b = 1 : b = 2 如果问号前面的条......
    201201/20
  • asp中Request兑现的Form集合
    asp中Request兑现的Form集合 关键词: Request.Form怎么用,Request.Form什么意思,Request对象的Form集合,Request.Form案例 当用POST方法提交表单,数据被保存......
    201201/17
  • 用vbscript中的for循环求1到100的和
    用vbscript中的for循环求1到100的和 关键词: 用vbscript中的for循环求1到100的和 %@LANGUAGE=VBSCRIPT CODEPAGE=936% !DOCTYPE html PUBLIC -//W3C//DTD XHTML ......
    201201/16
  • 一个简单的vbscript结合网页html的过程sub案例
    一个简单的vbscript结合网页html的过程sub案例 . 将下面代码保存为shijian.asp,然后在iis下运行 %@LANGUAGE=VBSCRIPT CODEPAGE=936% !DOCTYPE html PUBLIC -//W3......
    201201/15

vbscript中for循环的跳出

心海网络:2012-01-11 09:36     阅读数:

vbscript中for循环的跳出

在vbscript的for循环中使用if条件搭配exit if立即跳出for循环

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>

<body>
<script language="vbscript">
Sub TwosTotal()
Dim j, total
For j = 2 To 10 Step 2
 total = total + j
 If j=8 then
 Exit for
 End if
Next
 MsgBox "总和为 " & total & "。"
End Sub

call TwosTotal()
</script>
</body>
</html>

 

以上由西安网站制作公司西安心海网站建设提供

在线客服
热线电话
400-888-2014
029-81627176
153 5370 4270

扫一扫微信咨询