收录日期:2021/01/28 16:27:50 时间:2016/07/31 12:13:26 标签:ASP
現在是套在一個循環當中用exit  for 跳不出來
給個好辦法讓我跳出循環吧
是套在一個四重for裏面的循環哦 
我死活跳不出來
break;


return ;
引用 2 楼 fengyarongaa 的回复:
break;


return ;

break 
不怎麼行 
客串asp煩躁啊   
後面再寫循環剔除空值
煩死了
该回复于2011-03-29 11:05:22被版主删除
贴代码

你是不是写死循环了 
for i=1 to 10
   for j=1 to 10
      for k=1 to 10
         if k=3 then
            goto Line1
         end if
      next k
   next j
next i
Line1:
msgbox("我跳出来啦")
function js(a)
  for p=0 to ubound(buzm03)'查詢部分
for i=0 to ubound(bucd)'所有部分
    if cd(i)=buzm03(p) then 
   ReDim Preserve pcd(UBound(cd),p)
   ReDim Preserve m(UBound(cd),p)
   pcd(a,p)=cd(i)
   m(a,p)=bucd(i)
   response.Write(pcd(a,p)+"444444444444"+m(a,p)+"*******")
   
  for j=0 to ubound(buzm03)'判斷zm03中是否已經沒有d開頭的值
      if mid(buzm03(j),1,1)="D" then 
     u=u+1       '計數
         response.Write("__________")  
  end if 
   next
   if u=0 then 
       response.Write("---gggg------")      
       exit for
   response.Write("---oooo------")     
   end if 

end if 
next
  next

end function
function xx()
 for a=1 to ubound(cd)
  call js(1)
   for i=0 to ubound(m,2)
   ReDim   Preserve buzm01(i)
   ReDim   Preserve buzm03(i)
      if len(pcd(a,i)) < 1 then 
         response.Write(i)
     exit for
 response.Write("qiuying")
      end if
   buzm01(i)=pcd(a,i)
   buzm03(i)=m(a,i)
  next
 next
end function
call xx()

我不管它了
現在是卡在多維數組中剔除數據
客串asp 鬧出笑話不要介意哦 
引用 7 楼 xxwood 的回复:
for i=1 to 10
  for j=1 to 10
  for k=1 to 10
  if k=3 then
  goto Line1
  end if
  next k
  next j
next i
Line1:
msgbox("我跳出来啦")
asp 里怎麼用   它說 必須提供稱述式
引用 7 楼 xxwood 的回复:
for i=1 to 10
  for j=1 to 10
  for k=1 to 10
  if k=3 then
  goto Line1
  end if
  next k
  next j
next i
Line1:
msgbox("我跳出来啦")
好玩
引用 7 楼 xxwood 的回复:
for i=1 to 10
  for j=1 to 10
  for k=1 to 10
  if k=3 then
  goto Line1
  end if
  next k
  next j
next i
Line1:
msgbox("我跳出来啦")

asp可以用GOTO 这样的语法的???
<%
ASP中没有跳转代码,你应该换一种思路

for i=1 to 10
for j=1 to 10
for k=1 to 10
if k=3 then
call Line1()
end if
next k
next j
next i
%>
<%
sub Line1()
把要执行的代码放在这里
response.end
end sub
%>
引用 13 楼 lzp4881 的回复:
<%
ASP中没有跳转代码,你应该换一种思路

for i=1 to 10
for j=1 to 10
for k=1 to 10
if k=3 then
call Line1()
end if
next k
next j
next i
%>
<%
sub Line1()
把要执行的代码放在这里
response.end
end sub
%>

+1
我是要跳出來   不是什麽call

dim bStop'定义一个全局布尔变量,表示是否停止循环
bStop=false

for i=1 to 2
  for j=1 to 2
    for k=1 to 5
      if k=3 then
        bStop=true:       exit for'改变bStop为真
      end if
    next k
    if bStop then exit for  '若bStop为真则退出该循环
  next j
  if bStop then exit for  '若bStop为真则退出该循环
next i
该回复于2011-03-29 14:25:34被版主删除
引用 16 楼 toury 的回复:
VBScript code

dim bStop'定义一个全局布尔变量,表示是否停止循环
bStop=false

for i=1 to 2
  for j=1 to 2
    for k=1 to 5
      if k=3 then
        bStop=true:       exit for'改变bStop为真
      end if
    next k……
這個還對點

VB中用Mschart控件显示excel图表 如何使用mobile控件中的objectList实现分页? [已处理] 网摘建议-标签分类 c# winform 添加XPTable控件的问题,急求解答! ANT 编译工程错误“编码 GBK 的不可映射字符”警告 求SQL语句 请问 List 有类似Js中Array的Join方法吗? linux下c语言处理大文件问题 急需理解Spring3.0 MVC的原理 请教高手----私用静态成员变量的初始化问题 求教 DATA_LENGTH与DATA_PRECISION的区别 c++自己创建头文件问题 软件本地化行业发展前景如何? 关于SQL语句的重用技术 内存表kbmMemTable的数据怎么保存为二进制文件? asp.net如何編輯多行后一次性保存到數據庫 求助一个oracle的简单问题 小弟才学的 啥都不会 还望大神们多多指点啊 建表时,如何设置字段的值,默认等于其他两个字段的和? 建表时,如何设置字段的值,默认等于其他两个字段的和? eclipse ViewPart刷新问题 如何编程读取文档的某一段信息(指定的一部分) 级联删除 https页面调用google map有安全警告对话框弹出来,请问如何解决 求助 求助 vb.net中连接sql数据库的连接字符串根据用户的输入而改变怎么写 XPE 开发 中文显示问题 (超急|100分)UserControl1中有一个Image控件,请问如何给这个改变Image里面的图片 高手关注 我最近在做有关数据分析系统(图+表)形式 看到新浪网上 宏观数据 做的太棒了 想问怎么实现的 黑莓8700G怎么不能用自带浏览器