Korn
|
SAO PAULO SP - BRASIL
|
|
Postada em 02/05/2005 18:10 hs
Opa pessoal como ta blz, eu tenho um form Chamado FrmClientes (Tbl_Clientes) , onde eu cadastro os clientes e tenho o form FrmPedidos (Tbl_Pedidos) , eu gostaria de cadasrtar um cliente e quando eu terminasse o cadastro dele eu apertases o botao denrto do FrmClientes e levasse para o FrmPedidos , e la aparecesse o nome do Clientes cadasrtado no txtnomeCli , pessoal agradeço desde ja valew
Jesus Cristo é O Senhor!!!
|
|
|
|
|
|
|
|
Postada em 02/05/2005 20:07 hs
você atribir nome do cliente a uma a variavel global e no load do form de pedidos carregar esta informação no campo nome do cliente, ou então no load no form do pedido verificar se o form do cliente está ativo e pegar o nome do cliente
|
|
|
|
Korn
|
SAO PAULO SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 03/05/2005 12:04 hs
Obrigado por postar Martini , eu ponho tipo um public cli as string no modulo e depois? naun entendi
Jesus Cristo é O Senhor!!!
|
|
|
|
Martini
|
PAROBÉ RS - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 03/05/2005 14:15 hs
'botão tela de clientes que chama form do pedido Private Sub Command1_Click() strCli = Me.txtCampoNomeCliente.Text If frmPedidos.WindowState = vbMinimized Then frmPedidos.WindowState = vbNormal Else frmPedidos.Show End If frmPedidos.SetFocus End Sub 'form activate do formulário do pedido Private Sub Form_Activate() Me.txtCampoNomeCliente.Text = strCli End Sub
|
|
|
|
Korn
|
SAO PAULO SP - BRASIL
|
|
Postada em 03/05/2005 14:31 hs
eu coloquei assim no form Clientes strCli = Me.txtnomeCli.Text If FrmPedidos.WindowState = vbMinimized Then FrmPedidos.WindowState = vbNormal Else FrmPedidos.Show End If FrmPedidos.SetFocus End Sub e no Active do form Clientes Me.txtnomeCli.Text = strCli e no form pedidos eu naun ponho nada? eu fiz assim e naun aconteceu nada e toda vez qu eu entro no form clientes os nomes do clientes somen
Jesus Cristo é O Senhor!!!
|
|
|
|
Korn
|
SAO PAULO SP - BRASIL
|
|
Postada em 03/05/2005 14:41 hs
estava ficando em branco porq o nome txtnomecli era o mesmo da form pediso mas ai eu mudei do pedido pra txtnomeCliPed e coloquei no active do Cliente assim strCli = Me.txtnomeCliPed.Text e deu erro ao entrar no form de method or data emnber not foud
Jesus Cristo é O Senhor!!!
|
|
|
|