怎么在VF里添加移去代码啊!移出循环!!下次在执行循环体的时候不显示所要移去的记录!在命令按钮添加!!代码是什么??帮帮我吧!
移去循环的代码
怎么在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.。
谢谢hu9jj
好象hu9jj不太对啊!运行后,要移去的记录在表中都改成了.T.了。这样表中的记录不就改了吗?还有没有不改记录的!