Subtrair campo de outra tabela

[Justiceira]

Estou usando VB6 e DAO com access

Preciso que ao preencher um formulario e for salvar na tabela TBev seja subtraido o valor de um campo de outra tabela TBat.

É o seguinte no meu formulario tenho um campo(combobox)que se for escolhido sim

deve ser subtraido nos campos total e vagadef e

se for escolhido não vai apenas subtrair no campo total

é porque no banco de dados access te preenchido alguns dados já e cada registro possui uma quantidade de pessoas q podem participar de determinado atividade

exemplo

cinema total=13 e vagsadef=5

se for sim ficara cinema total=12 e vagsadef=4

alguém pode me ajudar

Editado Junho 2, 2010 por Justiceira

[kuroi]

a acho q já disse antes, mas num so muito bom com codigos de dao, mas se não me engano, você pode executar uma query pelo objeto database. exemplo:

If Combo1.Text = "Sim" Then
    db.Execute "Update TBat Set total = total - " & valor1 & ",  vagsadef = vagsadef - " & valor2 & " Where codigo = " & codigo
End If[/code]
ou você usaria um outro recordset pra selecionar os dados referentes ao registro, e alterava os campos do recordset.
se tiver dificuldade, poste o codigo q você usa pra fazer o update.

[Justiceira]

Deu certinho Kuroi valeu!!!