A maioria dos programas de computador conectado a um arquivo de banco de dados permitem que os usuários finais para visualizar e manipular dados sem a necessidade de interagir diretamente com o banco de dados. Em um aplicativo de entrada de dados, um formulário de pesquisa permite ao usuário procurar por registros específicos em uma tabela que corresponde aos critérios fornecidos. Isso limita a quantidade de dados baixados do banco de dados e exibidos no formulário. As informações recuperadas podem ser analisados ​​, editados, excluídos ou enviados para a impressora para produzir uma cópia impressa. Para criar um formulário de pesquisa para um projeto do Visual Basic, o programador deve ter conhecimentos básicos em design de formulário do Visual Basic e codificação, bem como consulta de banco de dados. Coisas que você precisa
Visual Basic 6 software de banco de dados arquivo

Show Mais instruções
1

Carregue o ambiente do Visual Basic a partir de seu computador , clicando em " Iniciar> Programas> , Microsoft Visual Studio 6.0 > Microsoft Visual Basic 6.0 " .
2

Selecione " standard EXE "da caixa de diálogo" New Project " que aparece. Clique no botão "Abrir" para prosseguir.
3

Arraste e solte os controles da " caixa de ferramentas " para a forma de projetar a interface e defina as propriedades individuais depois sob a janela "Propriedades" . Um formulário de pesquisa geralmente tem caixas de texto onde os usuários digitam palavras para pesquisar no banco de dados , rótulos, alguns botões de comando, grade para mostrar o resultado e controle de banco de dados que liga o formulário para a tabela no banco de dados . Continuar com o projeto da forma como preferencial.
4

Clique em " Exibir> Código " do menu para ir para a seção de código . Este é o lugar onde você vai escrever o código fonte para o seu projeto .
5

Vá para " Form_Load " evento clicando no nome do evento apropriado das caixas suspensas na seção de códigos. Introduza um código semelhante ao abaixo . Este código irá definir as propriedades de conexão do seu controle de dados e se conecta a rede para o arquivo de banco de dados.

Com Adodc1.ConnectionString = "[ Digite a seqüência de conexão aqui ]" . CursorType = adOpenKeyset.CursorLocation = adUseClient.LockType = adLockOptimistic.CommandType = adCmdTable.RecordSource = "[ Digite o nome de uma tabela ou consulta aqui ]" . RefreshEnd Com

Com Grid1Set . DataSource = Adodc1.HighLight = flexHighlightWithFocus.ColWidth (0) = . ColWidth ( 0 ) + 1000 ' este é dimensão da coluna de exemplo , a mudança de preferred.ColWidth ( 1 ) = ColWidth ( 1 ) + 1800.ColWidth ( 2 ) = ColWidth ( 2 ) + 1800.ColWidth ( 3 ) = ColWidth ( 3 . . . ) + 2300.Refresh.TabIndex = 0End Com
6

Dê um clique duplo na caixa de texto onde o usuário irá digitar os critérios de pesquisa. Por exemplo, o usuário deseja pesquisar certos sobrenomes do banco de dados e ele irá digitar as letras na caixa de pesquisa . Quando os jogos são encontrados, os registros serão exibidos na grade. Na seção de código , vá para " Text1_Change ()" do evento e introduzir um código semelhante ao seguinte :

Dim t como corda

Se Text1.Text < > "" ThenIf Adodc1 . RecordSet.RecordCount <> 0 Thent = " * " + Text1.Text + "*" Adodc1.Recordset.Filter = "Sobrenome like ' " + t + "' " End IfElseAdodc1.Recordset.Filter = adFilterNoneEnd Se

7

Pressione a tecla "F5" para executar o projeto . Teste o programa e verificar se ele está funcionando como deveria.
8

Salve o projeto , clicando em " File> Save Project As " no menu e fornecer um nome de arquivo descritivo.