Criticar exclusão tabela um para muitos

Grandes Mestres,

Tenho um determinado cadastro de sócios. TbSocios é a tabela principal e tem várias tabelas relacionadas (um para muitos) como bairros, UF, Município, etc. O usuário apaga determinado bairro da tabela e consequentemente em cascata vai todos os sócios daquele bairro. Como critico para não deixar excluir registro da tabela auxiliar que tenha registro relacionado na tabela principal?
Sei que na hora que se tenta excluir um registro da tabela auxiliar que tenha algum registro relacionado na tabela o ACCESS mostra mensagem das consequências, mas queria não deixar excluir de modo algum até não ter mais nada relacionado na tabela principal.
Mostrar mensagem: Caro usuário, desculpe, você não pode excluir este registro. Temos 40 (resultado de pesquisa) sócios que moram neste bairro."

Desde já, muito agradecido.

Caros amigos

Consegui resolver o problema baseado neste exemplo abaixo:


If (Eval("DLookUp(""[Advogado]"",""[TbProcessos]"",""[Advogado] = Form.[Advogado] "") Is Not Null")) Then

MsgBox "Você não pode excluir esse registro. O mesmo está sendo usado em outras tabelas relacionadas do sistema...", vbCritical, "PERIGO"

Else

On Error GoTo Err_Comando13_Click


DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdDeleteRecord

Exit_Comando13_Click:
Exit Sub

Err_Comando13_Click:
MsgBox Err.Description
Resume Exit_Comando13_Click
End If

Muito grato a todos.

Abraços