总是没法退出循环

2010-12-30 02:37:36 165 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

EXCEL VBA for多重循环举例及如何退出某个嵌套循环在VBA当中，同样和编程语言一样，有着for循环语句。其语法为如下：For<计数器=开始数>To<结束数>[step步长][指令][ExitFor][指令]Next[计数器]从开始到结束，反复执行For和Next之间的指令块，除非遇到ExitFor语句，将提前跳出循环。其中，步长和ExitFor语句以及Next后的计数器均为可选... 阅读详情

declare @TID int,@UID int,@RID int

select @UID=UID from bbsUsers where Uname='心酸果冻'

select @TID=TID from bbsTopic 

		where Ttopic='什么是.net啊'and Tcontents='微软的广告快超过半个北京城了' and TuID=@UID

select @RID=RID from bbsReply

		where RtID=@TID

--回帖人-50分

while(1=1)

	begin

		if exists(select top 1 RuID from bbsReply where RtID=@TID)

			begin

			select top 1 @UID=RuID from bbsReply where RtID=@TID

			update bbsUsers set Upoint =Upoint-50 where UID=@UID

			--删除回帖表

			delete from bbsReply where RID=@RID

			end

		else

			break

	end