Resultado da pesquisa aparecer no mesmo Formulário

[henrique-albano]

Boa tarde,

Mais uma duvida em VBA :unsure:

Seguinte tenho uma tabela de produtos e quero fazer uma consulta através do código, para saber a quantidade em estoque do produto, porém queria que ficasse assim:

Em um formulário houvesse uma caixa de texto pedindo para digitar o código, e após clicar no botão para pesquisa aparecesse o resultado no mesmo formulário onde se encontram a caixa de texto e o botão de pesquisa isso em vba

Ex:

a pessoa digita o código e após clicar em pesquisar, aparece logo abaixo o resultado de sua pesquisa, não precisando abrir um novo formulário

desde já, agradeço

Edited November 13, 2011 by henrique-albano

[Iceguy]

no evento click do botão coloco algo como

Dim rs As Recordset

Set rs = CurrentDb().OpenRecordset("SELECT COUNT(produto) AS Quantidade FROM tabela WHERE cod = " & campoCodigo)
'Se for campo texto usar WHERE cod = '" & campoCodigo & "'"

If rs.EOF And rs.BOF Then
    Exit Sub
End If

campoQuantidade = rs("Quantidade")

rs.Close
Set rs = Nothing