关于循环筛选的问题，谢谢了。 - 编程论坛

yangfrancis2015-05-09 07:24

是不是想要
dim sum as integer
sum=0
for k3=68 to 150
   if ye(k3)=150 then
      print Str(k3)
      sum=sum+1
      if sum>=2 then
          exit for
      end if
   end if
Next k3

renxiaoyao362015-05-09 13:09

优化楼上代码
Dim Tagg as Boolen
For k3=68 to 150
if Tagg=True then exit for
if ye(ke)= 150 then
Tagg=True

end sub
没试过，应该有效

另外，发现你的一些问题
严重错误：
你的For循环的计数器就是K3，也就是说，没完成一个循环，K3的值都会+1直到等于150退出循环
这意味着，你的K3不可能只有两个值，同时,K3是不受你的控制的
或者说你是要遍历一个数组内的所有数据，发现对应数据则进行操作？
如果是这样，就不需要我们改动了
普通错误：
没有输出语句

[ 本帖最后由 renxiaoyao36 于 2015-5-9 13:13 编辑 ]