移去循环的代码
怎么在VF里添加移去代码啊!移出循环!!下次在执行循环体的时候不显示所要移去的记录!在命令按钮添加!!代码是什么??帮帮我吧!
假定逻辑字段名为“xs”,你可在“移去”按钮的click事件中添加下列代码:
if MessageBox("确实要移去"+alltri(str(recc()))+"号记录吗?",49,"操作确认")=1 &&提供一次确认的机会
xs = .f. &&设置不显示的记录
set filte to xs &&将xs=.t.的记录筛选出来
go bott &&移动记录指针,让筛选起作用
thisform.列表框名.refresh &&刷新列表框
endif
你只要先在列表框内选定要移去的记录,然后再点击“移去”按钮,确认后将该记录移去。
在此之前你需要将所有需要显示的记录的xs字段值设置为.t.。