USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Pesquisando dados em outro form....
ChicoVieira
CRUZEIRO
SP - BRASIL
ENUNCIADA !
Postada em 30/08/2007 13:34 hs            

Olá. Tenho um form onde cadastro os dados do cliente. Como o sistema procura pelo contribuinte (através do CPF ou do CNPJ), e, quando se cadastra um contribuinte, uma textbox formata os números para o padrão do CPF (xxx.xxx.xxx-xx) ou do CNPJ (xx.xxx.xxx/xxxx-xx), tento consultar diretamente no form por uma inputbox (que não permite a formatação dos números). Assim, para tentar uma solução mais criativa, gerei uma espécie de uma inputbox(na realidade, um pequeno form, que é acessado toda vez que clico no form principal, em consultas). Esse form pequeno exibe duas maskedit, com as formatações acima.

Só que não consigo fazer o form principal (o dos dados cadastrados) receber os dados digitados no form menor. Como consigo conecta-los, de forma que, ao digitar um número de CNPJ qualquer (que esteja cadastrado no sistem), o form principal já abra com os dados procurados? Agradeço se alguém tiver uma idéia de como resolver essa parada...

Chico.

   
Roßerto
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
SAO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 30/08/2007 14:14 hs            
Olá, Chico
 
Primeiro, vc já experimentou usar o ACTIVETEXT, é uma ocx free, que faz a formatação do CPF e CNPJ e ainda por cima faz validação dos mesmos.
Segundo, vc pode fazer o seguinte no evento LOSTFOCUS do segundo form ou no botão OK do segundo form, vc pode fazer uma pesquisa do seu banco de dados e passar os dados retornados para o primeiro form da seguinte maneira:
 
Form1.txtCampo = tabela!Campo
 
é bem simples :D
 
Boa sorte.
 
 
   
ChicoVieira
CRUZEIRO
SP - BRASIL
Postada em 30/08/2007 17:25 hs            
Valeu, Roberto. Vou tentar à noite, em casa.
Quanto a essa ocx, vou ver se baixo e tento utilizar.
Agradecido. Chico.
     
Sandro
não registrado
ENUNCIADA !
Postada em 31/08/2007 21:36 hs   
Olá Chico,
 
Não sei se entendi bem, mas se o problema é transferir os dados de um campo para outro, você pode fazer de duas formas:
 
1. Declarar uma variável para o seu segundo formulário usando a cláusula WithEvents, o que irá permitir que você manipule os eventos da outra tela. Você verá a sua variável na lista de controles do seu formulário principal. Assim, você poderá pesquisar no momento do lostfocus, ou do pressionar do botão;
 
2. Ao invés de exibir o formulário da forma tradicional, declare uma variável para ele e, dentro dele não use o método unload, mas sim o método hide, que oculta mas não destrói o formulário em memória. Desta forma você pode recuperar os dados dele e fazer a pesquisa no seu form principal e somente depois fechar o form:
 
Dim Frm as Form2
 
Set Frm = New Form2
Frm.Show vbModal
TxtCodigo.Text = Frm.TxtCodigo.Text
<Seu código de pesquisa aqui, ou chamada de procedure>
Unload Frm
Set Frm=Nothing
 
Na verdade o controle da busca permanecerá no seu form principal, mas você usará o form2 como entrada.
 
Espero ter ajudado,
Sandro.
   
Treze
Pontos: 2843 Pontos: 2843
SÃO VICENTE
SP - BRASIL
Postada em 06/09/2007 16:27 hs            
Bom vou explicar de uma forma mais facil.
vamos começar
seu form principal se chama ex: frmPrincipal
 
nele possui um campo texto com nome ex: txtCPF.text
 
A partir dai faça o seguinte:
 
no form2 onde você vai digitar possui o nome ex: txtPesquisaCPF
 
com certeza vc deve ter inserido um botão de pesquisa:
então no evento clik deste botão insira o seguinte código
 
Private sub Command1_Click()
FrmPincipal.txtCPF.text=Form2.txtPesquisaCPF.text
Unload me
End sub
 
pronto está resolvido seu problema, simples né
até
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página