[Resolvido]Bloqueio da tecla shift e ocultar tabelas.

Esse fórum é muito legal!Os moderadores e outros participantes estão sempre prontos para responder.
A dúvida agora é a seguinte:
-Como fazer para que meu banco de dados só abra com todas as informações se a tecla shift estiver pressionada?

Simplesmente nada.

César, aí está um exemplo, estude como funciona e implemente na sua base.

Download

Terá apenas que importar para dentro do seu banco o formulário "frmExemplo"

Neste exemplo, o ocultar tabelas funciona apenas para o Back-End.

Para funcionar no Front-End, fiz uma pequena modificação. Se desejar colocar no Front, onde as tabelas são vinculos, aplique o seguinte código:

If MsgBox("Selecione a Opção Pretendida ! ", vbYesNo + vbQuestion, "Pergunta") = vbYes Then
DoCmd.SetWarnings False
Dim Tb As TableDef
For Each Tb In CurrentDb.TableDefs
If Not Tb.Attributes And dbHiddenObject Then
Tb.Attributes = dbHiddenObject
End If
Next
MsgBox "Todas As Tabelas Foram Ocultas. ", vbExclamation, "Aviso "
Else
For Each Tb In CurrentDb.TableDefs
If Tb.Attributes And dbHiddenObject Then
Tb.Attributes = dbHiddenObject = 0
End If
Next
MsgBox "Todas As Tabelas Estão Visíveis. ", vbExclamation, "Aviso "
Exit Sub
End If
Exit Sub


O shift pode ser ativado e desativado apartir de outro arquivo, então depois que desativar o shift e fechar este exemplo, utilize para destravar as seguintes aplicações:

shift - Activar Desactivar Tecla Shift em Banco(s) Externo(s)

shift - Ativa / Desativa Tecla Shift


Bom trabalho.

Não percebi que queria ocultar as tabelas, porque para abrir a BD com a tecla shift, não precisa de fazer nada, só carregar em shift.

Dilson e Vieira, vossa orientação foi válida, mas ainda estou um passo atrás, ou seja, quero saber ainda como tenho que fazer no meu banco de dados para que um leigo mesmo não consiga ver aquela janela de controle do banco de dados, onde tem as tabelas,formulário, etc.
Agradeço desde já a paciência.

Amigão

Procure no repositório de exemplos que o Mestre JPaulo colocou a forma de ocultar tabelas como exemplo.

Amigos, depois percebi que para fazer o que queria, era só ir nas opções de inicialização e selecionar a forma como você gostaria que seu banco de dados aparecesse.
Obrigado pela atenção.

Agradecemos o retorno.