[Resolvido]InputBox ele soma a caixa de texto?

Bom dia alguém já conseguiu somar a quantidade de uma inputbox a uma caixa de texto que ja contém um valor?

Eu tenho um campo de Estoque Atual no meu BD que necessita de atualização, e tentei colocar algo que vinhasse a somar
com a quantidade existente no estoque, mas não obtive sucesso!

Alguém tem algum exemplo.

abraço no aguardo.

boas
com o inputbox pode retornar o valor que queres somar.
amostra o que fizes-te

textbox.text = val(val(textbox.text) + val(inputbox ("digite o valor", "msg")))

cumps
acao

Olá pessoal, obrigado pelo apoio...
Consegui dessa forma:
No evento da caixa de texto Ao clicar duas vezes...

Private Sub EstoqueAtual_DblClick(Cancel As Integer)
Dim Quantidade As Integer
Quantidade = InputBox("Informe a Quantidade que Deseja dar ENTRADA")
EstoqueAtual = Quantidade + Nz(Me.EstoqueAtual)
MsgBox "O Novo estoque é " & EstoqueAtual, vbInformation, "Aviso"
Me.Refresh
End Sub

Valeu ate a próxima.