[Resolvido]Erro em tempo de execução

Criei um tabela onde insiro os dados da Delegacia, sendo que os campos instituicao e delegacia deverão aparecer no formulário frmPesquisa e frmDados para indentificação, nos quais inseri duas labels lbl_instituicao e lbl_delegacia e utilizei o seguinte código:

Private Sub Form_Open(Cancel As Integer)
Dim Instituicao As String
Dim Delegacia As String
Instituicao = DLast("Instituicao", "tblDelegacia")
Delegacia = DLast("Delegacia", "tblDelegacia")
Me.lbl_instituicao.Caption = Instituicao
Me.lbl_delegacia.Caption = Delegacia

If Application.Version > 11# Then
DoCmd.ShowToolbar "ribbon", acToolbarNo
End If
End Sub

Como forma de exibir o formulario dos dados da delegacia para inserção dos dados loga na primeira vez que se acessa o programa, inseri o código:

Private Sub Form_Open(Cancel As Integer)
DadosDaTabela = DCount("*", "tblDados")

If DadosDaTabela = 0 Then
DoCmd.OpenForm "frmDelegacia", acNormal
Else
DoCmd.OpenForm "frmPesquisa", acNormal
End If

On Error Resume Next
Dim Instituicao As String
Dim Delegacia As String

Instituicao = DLast("Instituicao", "tblDelegacia")
Delegacia = DLast("Delegacia", "tblDelegacia")
Escrivão = DLast("Escrivão", "tblDelegacia")
Me.lbl_instituicao.Caption = Instituicao
Me.lbl_delegacia.Caption = Delegacia

If Application.Version > 11# Then
DoCmd.ShowToolbar "ribbon", acToolbarNo
End If

End Sub

Porém, se excluo todos os dados das duas tabelas, ao abrir o programa aparece a seguinte mensagem:

Erro em tempo de execução "94""

Uso de "Null" inválido e ao depurar retorna para os códigos:

Instituicao = DLast("Instituicao", "tblDelegacia")
Delegacia = DLast("Delegacia", "tblDelegacia")

Como consertar?

Obrigado, Avelino...mais uma vez.

Aproveito para agradecer em público ao amigo Avelino que criou um programa que utilizo até hoje em meu trabalho, tendo sido copiado para muitas pessoas que auxiliam em no mínino 90% do trabalho que antes era manual e cansativo.

Também foi ele o responsável pelo meu interesse em ACCESS e suas ferramentas.