Gabriel, não sei se entendi, más isso seria como uma pesquisa no banco de dados ?

E qual a linguagem que você está usando

Eu uso no momento DAO que usa o seek ( mais fácil )

Ficaria assim:

 

programas.index='<nome do index>'

programas.seek "=",txt1.text

if programas.nomatch then ' senão encontrar faça

   msgbox " Item não encontrado

else

   txt2.text=programas!Endereco

end if

 

Espero poder ter compreendido o que você queria, senão desculpa

porque em vez de voce escrever , voce nao colocar varios botoes com os nomes do programa e é so clicar que ele entra

Ficaria assim :

 

Primeiro você entra no banco de dados e cria um index no campo que você deseja procurar, por exemplo dar um nome para o index - IDescricao que estará indexando o campo descrição da sua tabela

 

No General do Form

Public DB as Database

Public Programas as recordset

 

No Active desse form

Set db = opendatabase("<coloque o caminho até o bd>")

Set programas=db.openrecordset("<nome do campo do bd>",dbopentable)

EX: de abertura do meu programa

    Set DB = OpenDatabase("d:pailancamento.mdb")
    Set Lancamento = DB.OpenRecordset("Lancamento", dbOpenTable)

No evento keyascii do text da descricao

If keyascii=13 then ' Depois de apertar o enter

   programas.index='<nome do index>' ex: "IDescricao"