例如： for k3=68 to 150
        if ye(k3)= 150     (ye(k3)你可以理解是个算法)
         （其中ye(k3)= 150已经知道有两个k3的值），怎么把这两个k3分别筛选出来，怎么进行编码？
        谢谢了

是不是想要
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

优化楼上代码
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 编辑 ]