Atualizar campo da Tabela

Pessoal,
Preciso de uma ajudinha...

Tenho em uma caixa de texto  ( Texto49). No evento Fonte de Controle: =SeImed([Texto45]>1;[Texto45]+1;[Texto45]-1)
isso me retorna um valor X.
Preciso colocar esse valor em um atributo de uma tabela. TB_Lanc atributo total.
Para isso já coloquei no evento Valor Padrão = [Texto49] só que não está dando certo.

Alguém pode me ajudar?

Agradeço.

Digamos que esse seu Texto45, vc digite o valor nele, certo?

Bom, entao... No evento apos atualizar desse Texto45 coloque:

Me.tb_Lance = IIf(Me.Texto45 > 1, Me.Texto45 + 1, Me.Texto45 - 1) 'Esse e o mesmo Selmed, só que no VBA


Obs: tb_Lance é o nome do campo que receberá o Valor calculado na condição a cima.... Ele deve estar no Formulário, pode ate coloca-lo invisível.