ACC: "não é possível ocultar um controle que tem o foco" mensagem de erro

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 88168
Este artigo foi arquivado. É oferecido "como está" e não será mais atualizado.
Sumário
Moderado: Requer básica de macro, codificação e interoperabilidade habilidades.

Se você tentar alterar a propriedade Visible de um controle para False, enquanto que o controle tem o foco, você receberá a seguinte mensagem de erro:
Você não pode ocultar um controle que tem o foco.
Você não pode definir a propriedade Visible de um controle para False durante controle tem o foco. Você deve primeiro definir o foco em outro objeto, e, em seguida, você pode alterar a propriedade visível.
Mais Informações
O exemplo a seguir usa dois botões de comando para demonstrar como gerar a mensagem de erro tentando alterar a propriedade Visible de um controle que tem o foco e como evitar o erro definindo o foco em outro lugar.

Cuidado: Após os passos deste exemplo modificará o exemplo banco de dados Northwind.mdb (ou NWIND.MDB na versão 2.0 ou anterior). Convém fazer o backup do arquivo Northwind.mdb (ou NWIND.MDB) e execute essas etapas em uma cópia do banco de dados.
  1. Abra o exemplo banco de dados Northwind.mdb (ou NWIND.MDB no versões 1.x e 2.0).
  2. Abra o formulário clientes no modo de design e adicione dois botões de comando a seguir para o formulário:
          Form: Customers      --------------------------------------------------------      Command Button:         Name: Button1         Caption: Error         OnClick (or OnPush in version 1.x): [Event Procedure]      Command Button:         Name: Button2         Caption: Success         OnClick: [Event Procedure]					
  3. Defina a propriedade OnClick para o Button1 para o seguinte procedimento de evento:

    Observação: No Microsoft Access 1.x e 2.0, a palavra particulares antes de sub é omitida por padrão.
    Private Sub Button1_Click()   On Error GoTo errhandler      'Set the focus on the City control      Me!City.Setfocus      'Make the City control invisible      Me!City.Visible=False      Exit Sub   errhandler:      'Trap the Control Has Focus error      If Err = 2165 Then         MsgBox "Can't Make Control Invisible"      Else         MsgBox Err & " " & Err.Description      End If      Exit SubEnd Sub					
  4. Defina a propriedade AoClicar para Button2 para o seguinte procedimento de evento:
    Private Sub Button2_Click()   On Error GoTo errhandler      'Set the focus on the Region control      Me!Region.Setfocus      'Make the City control invisible      Me!City.Visible=False      Exit Sub   errhandler:      'Trap the Control Has Focus error      If Err = 2165 Then         MsgBox "Can't Make Control Invisible"      Else         MsgBox Err & " " & Err.Description      End If      Exit SubEnd Sub					
  5. Abra o formulário Customers no modo de formulário. Clique no botão erro e note que você recebe a mensagem "não é possível criar o controle Invisible." Clique no botão êxito e observe que o campo Cidade desaparece.
Você pode ocultar um controle que tem o foco do t

Propriedades

ID do Artigo: 88168 - Última Revisão: 12/04/2015 09:16:56 - Revisão: 2.1

Microsoft Access 1.0 Standard Edition, Microsoft Access 1.1 Standard Edition, Microsoft Access 2.0 Standard Edition, Microsoft Access 95 Standard Edition, Microsoft Access 97 Standard Edition

  • kbnosurvey kbarchive kbmt kberrmsg kbinfo kbusage KB88168 KbMtpt
Comentários