Ir para conteúdo
Fórum Script Brasil

hehehe

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Sobre hehehe

hehehe's Achievements

0

Reputação

  1. e ai pessoal, estou querendo realizar uma busca de um cliente no banco de dados do access e que apareça num dbgrid mas não esou conseguindo me ajudem!!!!!!!!!!!!!!! segue aonde eu parei no codigo Dim A As String A = InputBox("Digite o Executante?", "Fechamento", vbOKCancel) TBCadastro.Index = "IExecutante" TBCadastro.Seek "=", A If TBCadastro.NoMatch Then MsgBox ("Executante não encontrado") Exit Sub End If Dim B As String B = InputBox("Digite o Mês de Lançamento?", "Fechamento", vbOKCancel) TBCadastro.Index = "IMes" TBCadastro.Seek "=", B If TBCadastro.NoMatch Then MsgBox ("Mês de Lançamento não encontrado") Exit Sub End If TBCadastro.Index = "IExecutante" DtaBusca.Enabled = True DtaBusca.Refresh DBGrid = TBCadastro("Executante") DBGrid = TBCadastro("Mês") deu pra entender um pouco o começo, no começo eu digito o nome da pessoa e o mes em que ela foi adicionada no banco de dados e eu queria que o resultado da busca aparece-se no db grid me ajudem!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
×
×
  • Criar Novo...