在VF表单中的问题

来源：百度知道 编辑：UC知道 时间：2024/05/10 08:33:05
select a
use 系组
do case
case substr(thisform.pageframe1.page3.text1.value,7,2)="11"
locat for substr(班级,3,4)="计专"
do while found()
thisform.pageframe1.page3.combo1.additem(班级)
continue
enddo
case substr(thisform.pageframe1.page3.text1.value,7,2)="22"
locat for substr(班级,3,4)="英语"
do while found()
thisform.pageframe1.page3.combo1.additem(班级) continue
enddo
case substr(thisform.pageframe1.page3.text1.value,7,2)="33"
locat for substr(班级,3,4)="电子"
do while found()
thisform.pageframe1.page3.combo1.additem(班级) continue
enddo
case substr(thisform.pageframe1.page3.text1.value,7,2)="44"
locat for substr(班级,3,4)="旅游"
do while found()
thisform.pageframe1.page3.combo1.additem(班级) continue
enddo
endcase
u

use biao
n=0
go top
do while !eof()
n=n+1
skip
enddo
go top

for i=1 to n
do case
case substr(班级,3,4)="旅游"
thisform.pageframe1.page3.combo1.additem(班级)
case
……
case
……
case
……
endcase
skip
endfor

你看，用这样的结构不是少了很多的循环
哈