CONSULTA DE FORM

USUARIO.EXCLUIDOS 29/08/2006 23:36:55
#168248
ai pessoal... beleza?!

seguinte...
no meu programa, nas venda possui um botao "cmdConsProd",que chama o formulario "frmConProdutos" certo?!

ai utilizo o seguinte codigo ao dar um duplo click no msflexgrid do "frmConProdutos"..

Private Sub MSFlexGrid1_DblClick()
With frmCadVenda
    .txtCodProd = MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0)

If .txtCodProd.Text = Empty Then ' Se tiver em branco nao da erro
Else
    Set TBProdutos = BancoDeDados.OpenRecordset("select * from Produtos where codigo_Produto =" & .txtCodProd.Text)
    If Not TBProdutos.EOF Then 'Se encontrou
    .lblNomeProd = TBProdutos("descricao")
    Else
        MsgBox "Código da Produto não encontrado!"
        
        .txtCodProd = ""
        .txtCodProd.SetFocus
    End If
End If

        Unload Me
        .txtCodProd.SetFocus
End With
End Sub


esse codigo, ele faz o seguinte, ao dar um duplo click no flexgrid, ele passa o codigo do produto para o txtCodProd do "frmVendas"..
o problema é que eu quero utilizar esse mesmo form para consultar os produtos no form "frmCompras" ..

entenderam??
me ajudem ai... valew
VINICIUSVB6 29/08/2006 23:42:24
#168249
CARA EU NÃO ENTEDI MT BEM O QUE VC QUER...
VC QUER EXERGAR OS DADOS DO FORM "frmVendas" QUANDO ABRIR O FORM "frmCompras"
CLEVERTON 29/08/2006 23:47:47
#168250
Vejo como eu faço.
espero que fique claro pra vc.
USUARIO.EXCLUIDOS 30/08/2006 10:58:37
#168315
Bem, fiz um exemplinho bem simples para você...

Neste exemplo tem um form principal, que tem dois botões:

1) Clientes
2) Vendas

Cada botão abre um form

Em cada form tenho um textbox que deverá ser preenchido com o codigo do cliente
e um botão para pesquisar...

Se estiver no formulário de clientes o código selecionado no frid irá para este form

se estiver no de vendas o código do cliente irá para o form sde vendas....

Estou no trabalho, por isso fiz um exemplinho bem simples mesmo, mas espero que te ajude.
Tópico encerrado , respostas não são mais permitidas
Voltar