montei um programa de emissao de pedidos, ok

 

que montar junto a este programa uma pesquisa de produtos, por orden alfabetica, aonde surje o nome do produto , codigo e preço unitario

 

 

usei o dbgrid, e fico bom a pesquisa, so quero saber como faço para que o produto que focalizar com prompt, eu tecle enter e mesmo inclui no pedido de vendas, como inclusao no pedido

 

ok muito obrigado

 

 

'no evento KeyPress

Private Sub grdPesquisa_KeyPress(KeyAscii As Integer)
   If KeyAscii = 13 Then
      If Not adoRecordset.EOF Then
         frmPrinc.txtProduto = adoRecordset("Codigo")
      End If
      Unload Me
      Exit Sub
   End If

End Sub

'Depois de um Find ou faca um SQL para Localizar o Produto a partir do codigo,

ou ainda, pegue a descricao do Grid mesmo

 

Te +