篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了vbscript CASE TQuery相关的知识，希望对你有一定的参考价值。
TUpdate _Update = new TUpdate(_Transaccion.Conexion);
TExpOperation Excluido = new TExpOperation (new TField("Saldo"), OperacionExp.Resta, new TValue(0));
TCase _ExcluidoCS = new TCase(new TField("id"), new TValue(0));
_ExcluidoCS.AddWhen(new TField("id"), OperadoresFiltros.Igual, new TValue(Cols.Id) , new TValue(1));
_Update.Table = "PL_Ingresos_Deducciones";
_Update.SetValue("Excluido_CS", new TValue(Cols.Excluido_CS));
_Update.Where(new TField("Empresa"), OperadoresFiltros.Igual, new TValue(Cols.Empresa));
--------------------------------
update PL_Ingresos_Deducciones
set Excluido_CS = (case when id = variable then 1 else 0 end)
where Empresa = 1