7 maneiras de usar a função DLookup () do Microsoft Access que Você não pode perder …!

Você já ouviu falar ou já tentou a função Access Database DLookup? Deseja saber mais sobre essa função DLookup do Access Database? Então, nesse caso, você está na plataforma correta. Como, este tutorial é escrito com o principal prospectivo de fornecer a você as informações completas sobre a Função Dlookup do MS Access e principalmente se concentrar em como usar o dlookup no Access.

Avaliado como Excelente em Trustpilot
Ferramenta Gratuita de Reparo de Banco de Dados do MS Access
Repare arquivos de banco de dados MDB e ACCDB corrompidos e recupere tabelas de banco de dados, consultas, índices e registros excluídos facilmente. Tente agora!

O que é isso Dlookup de Access Função ?

O que é isso Dlookup de Access Função

O aplicativo Microsoft Access possui um poderoso pacote de manipulação de dados com muitas funções robustas para fazer a extração de dados como o trabalho de maneira fácil. A partir dessa vasta coleção de funções do MS Access, o DLookup é o mais prático.

No aplicativo do Microsoft Access, a função DLookup é usada para obter o valor de determinado campo do conjunto especificado de registros (um domínio). Você pode usar esta função DLookup no módulo Visual Basic for Applications (VBA), uma expressão de consulta, uma macro ou um controle calculado em um formulário ou relatório.

Essa função é melhor para recuperar o valor de determinado campo de um domínio. Aqui o domínio pode ser um conjunto especificado de registros da tabela, consulta ou expressão SQL. Pode-se usar esta função DLookup para exibir o valor dos campos que não estão presentes no conjunto de registros subjacente.

Por exemplo:

Suponha que você tenha um formulário na tabela Detalhes do pedido. O formulário exibirá campos Quantity, OrderID, ProductID, UnitPrice e Discount. No entanto, na tabela de produtos, o campo “ProductName” está presente. Nesse caso, você pode usar a função DLookup no controle calculado para exibir o ProductName no mesmo formulário.

Exemplos da Função DLookup

Exemplos da Função DLookup

Dim newvar as variant

Newvar = DLookup(“[student name]”,”studentmaster”,”[rollno]=1001″)

A partir do exemplo acima, extrai os dados do campo [nome do aluno] da tabela studentmaster para o número de rolo 1001.

Verifique o que acontecerá se a função DLookup for dada sem nenhum critério.

Newvar = DLookup(“[student name]”,”studentmaster”)

O código acima retornará os dados no campo [student name] do primeiro registro da tabela studentmaster.

Você também pode usar variáveis nos critérios. Por exemplo, um campo de formulário pode ser usado como <condition>

VOCÊ PODE GOSTAR:

7 maneiras excelentes para abrir o arquivo Mdb na maneira fácil…!

Newvar = DLookup(“[student name]”,”studentmaster”,”[rollno]=Form![rollno]”)

Isso ajudará a comparar os dados no campo [nome do aluno] da tabela studentmaster com o que está no campo [rollno] do formulário atual.

Para especificar critérios textuais que são de um campo em um formulário, inclua as aspas simples.

Nvar = DLookup(“[rollno]”,”studentmaster”,

“[student name]=’ ” & Forms![Marks]![student name] & ” ‘ “)

No geral, a moral da história é função DLookup é usada como uma expressão na consulta do Microsoft Access ou campo calculado no formulário para recuperar valores externos. Bem, você pode usar isso também no campo Criteria do construtor de consultas. Essa é a razão pela qual é mais eficiente fazer uma nova consulta com campos de ambas as tabelas e usá-la como conjunto de registros base.

O DLookup escolhe os registros salvos do domínio. Outro registro não salvo não está incluído no domínio.

Sintaxe da função Dlookup do Microsoft Access:

Sintaxe da função Dlookup do Microsoft Access

DLookup( expr, domain [, criteria)

The DLookup function syntax has these arguments:

Expr:

A parte Expression identifica o campo cujo valor você deseja retornar. Isso pode ser uma expressão de string para identificar um campo na tabela ou consulta ou pode ser uma expressão que executa o cálculo nos dados do campo.

Na parte de expressão da Sintaxe da função Dlookup, você pode incluir o nome do campo em uma tabela, controle ou um formulário, constante ou função. Se essa parte incluir qualquer função, ela poderá ser definida pelo usuário ou incorporada, mas não à função agregada SQL ou a qualquer outra função agregada do domínio.

Domínio

 A expressão de seqüência de caracteres que identifica o conjunto de registros constitui a parte do domínio da sintaxe da função Dlookup. Pode ser o nome da tabela ou o nome da consulta para a consulta que não precisa de nenhum parâmetro.

Critérios

Expressão de string usada para limitar o intervalo de dados no qual a função DLookup é executada. Suponha que o critério seja equivalente à cláusula WHERE na expressão SQL, sem usar a palavra WHERE. Se os critérios não forem mencionados, a função DLookup será aplicada em todo o domínio. Qualquer campo que esteja incluído no critério deve ser um campo no domínio, caso contrário, a função retornará um valor NULL.

A função DLookup () do banco de dados de acesso retorna o valor único de um único campo. Se nenhum registro corresponder aos critérios ou se o domínio estiver vazio, a função DLookup () retornará um valor Nulo. Se mais de um registro corresponder aos critérios, nesse caso, DLookup retornará a primeira instância desse <fieldname>.

Portanto, os critérios devem ser definidos com cuidado para obter campo exclusivo da função DLookup. Se os seus critérios preenchidos forem texto, mantenha o texto entre aspas simples.

Para calcular valores de data ou hora, coloque a hora ou o valor dos dados em sinais numéricos (#).

Como usar a função Dlookup () no Access?

Aqui estão as seguintes circunstâncias explicadas para aprender rapidamente sobre como usar a função Dlookup () no Access.

# 1 DLookup no registro de dados vazio

Se você aplicar a função DLookup sobre a tabela ou consulta que contém os registros, ela mostrará a mensagem de erro “Uso inválido de nulo”. Isso acontece porque você está tentando atribuir um valor nulo à variável strX.

Código:

Dim strX As String

strX = DLookup(“HolidayDate”, “tblHolidays”)

Me.txtResult = strX

End Sub

Para evitar essa mensagem de erro, você pode usar a instrução IF para verificar se há registro antes de alocar o valor do resultado à strX.

Correct Código:

Private Sub Command0_Click()

Dim strX As String

If IsNull(DLookup(“HolidayDate”, “tblHolidays”)) Then

     MsgBox “No Record Found”  ‘ or do something

Else

     strX = DLookup(“HolidayDate”, “tblHolidays”)

     Me.txtResult = strX

End If

End Sub

#2 DLookup com critérios textuais

Quando você usa sinal de igual no código “[UserLoginID] = ‘John’”, somente o registro com o nome de usuário inteiro = “John” será exibido como resultado desse critério.

O resultado será exibido como “Nenhum registro encontrado” porque não há registro com o nome de usuário “João”, mas há registros para “João Silva” ou “José João”.

Código:

Private Sub Command0_Click()

If IsNull(DLookup(“[User Name]”, “tblUser”, “[User Name] = ‘john'”)) Then

     Me.txtResult = “No Record Found”

Else

     Me.txtUserName = DLookup(“[User Name]”, “tblUser”, “[User Name] = ‘john'”)

End If

End Sub

LEIA TAMBÉM

Como importar o email do Outlook para o banco de dados do Access?

#3 DLookup sem critérios

Bem, é a maneira mais simples de usar a função DLookup (); ou seja, sem especificar nenhum critério. Nesse caso, a função DLookup fornecerá o valor do primeiro registro no campo CustomerName da tabela tbl_Customer.

Assim, a saída será “Barney Rubble”, porque é o primeiro registro na tabela tbl_Customer, como mostrado na figura abaixo.

Código:

Private Sub Command0_Click()

Dim strX As String

strX = DLookup(“CustomerName”, “tbl_customer”)

Me.txtResult = strX

End Sub

#4 DLookup com um critério numérico que vem do campo no formulário atual

O código “[UserID] = Me.txtUserID” é usado aqui como critério numérico para a função DLookup. Isso mostrará a saída “John Vang”, pois o ID do usuário 3 é para o nome de usuário “John Vang”, conforme a tabela tblUser mostrada acima.

Código:

Private Sub cmdGetResult_Click()

Me.Refresh

If IsNull(Me.txtUserID) Then

     MsgBox “Please enter a UserID”

Else

     If IsNull(DLookup(“[User Name]”, “tblUser”, “[UserID] = ” & Me.txtUserID)) Then

         Me.txtUserName = “No Record Found”

     Else

         Me.txtUserName = DLookup(“[User Name]”, “tblUser”, “[UserID] = ” & Me.txtUserID)

     End If

End If

End Sub

#5 DLookup com critérios de texto que vem de um campo no formulário atual

O código “[UserLoginID] = ‘” & Me.txtLoginID & “‘ ”é usado como critério para a função DLookup.

Suponha que você queira obter o nome de usuário para o UserLoginID inserido na caixa de texto UserLoginID neste formulário e exibi-lo na caixa de texto User Name.

Está errado se, na caixa de texto UserLoginID, você digitar jvang, o nome de usuário deve ser “John Vang”. Aqui duas Instruções IF são usadas para este código para verificar se o UserLoginID está inserido ou não e também para evitar erros se o Nome do Usuário for deixado vazio para o UserLoginID inserido.

Código:

Private Sub cmdGetResult_Click()

Me.Refresh

If IsNull(Me.txtLoginID) Then

      MsgBox “Please enter a UserLoginID”

Else

      If IsNull(DLookup(“[User Name]”, “tblUser”, “[UserLoginID] = ‘” & Me.txtLoginID & “‘”)) Then

           MsgBox “No User Name for this UserLoginID”

      Else

           Me.txtUserName = DLookup(“[User Name]”, “tblUser”, “[UserLoginID] = ‘” & Me.txtLoginID & “‘”)

      End If

End If

End Sub

#6 Consulta DLookup com critérios de data

A função DLookup também é usada para procurar informações na consulta. O código “[FinishDate] = # 4/30/2014 #” está sendo usado como critério de data para a função DLookup. Depois de aplicar o código abaixo, a saída será “Tarefa 5” porque a “Tarefa 5” tem a última data em 30/04/2014 como a consulta “tarefa concluída” abaixo.

Código:

Private Sub Command0_Click()

If IsNull(DLookup(“[TaskName]”, “task completed”, “[FinishDate] = #4/30/2014#”)) Then

     Me.txtResult = “No Record Found”

Else

     Me.txtResult = DLookup(“[TaskName]”, “task completed”, “[FinishDate] = #4/30/2014#”)

End If

End Sub

#7 DLookup com critérios numéricos

Nesta seção, o código “[UserID] = 6” é usado como critério numérico para a função DLookup. Isso mostrará a saída, o “Adam Smith”, porque o UserID 6 é atribuído ao nome de usuário “Adam Smith”.

Código:

Private Sub Command0_Click()

If IsNull(DLookup(“[User Name]”, “tblUser”, “[UserID] = 6”)) Then

    Me.txtUserName= “No Record Found”

Else

    Me.txtUserName = DLookup(“[User Name]”, “tblUser”, “[UserID] = 6”)

End If

End Sub

Embrulhar:

Espero que todas as informações acima mencionadas sobre a função Access DLookup lhe sejam úteis para facilitar o acesso desta função DLookup () no Access Database a partir de agora. A função DLOOKUP é silenciosa e fácil de usar, mas somente quando você entende como trabalhar com ela. Então, aprenda como usar a função DLOOKUP em múltiplos critérios e experimente todos eles. Se você se deparou com algum outro problema relacionado à função DLookup, pergunte na nossa seção FAQ. Você certamente receberá uma resposta imediata em sua pergunta.

Ainda está com problemas? Corrija-os com Stellar reparação para Access:

Este software garante sem costura reparo e recuperação do banco de dados ACCDB e MDB. Ele restaura todos os objetos, incluindo tabelas, relatórios, consultas, registros, formulários e índices, juntamente com módulos, macros, etc. Corrija os problemas do Microsoft Access agora em 3 etapas fáceis:

  1. Baixar Stellar Access banco de dados reparo ferramenta avaliado Excelente sobre Cnet.
  2. Clique nas opções Browse e Pesquisa para localizar um banco de dados corrompido do Access.
  3. Clique no botão Reparar para reparar e pré-visualização os objetos do banco de dados.

Pearson Willey é escritor de conteúdo de sites e longo- planejador de conteúdo do formulário. Além disso, ele também é um ávido leitor. Assim, ele sabe muito bem como escrever um conteúdo atraente para os leitores. Escrever é como uma vantagem crescente para ele. Ele adora explorar seu conhecimento no MS Access e compartilhar blogs de tecnologia.