[Resolvido]Quero que o formulário abra em branco

Bom dia.

Criei um BD para fazer cadastros de empresas, mas estou com uma certa dificuldade.

Sempre que abro o formulário para inserir uma nova empresa, o formulário aberto mostra os dados da primeira empresa que eu cadastrei, e quando algum usuário inexperiente não presta atenção nisso, ao tentar cadastrar uma nova empresa, ele acaba na verdade alterando os dados da primeira.

Como faço para ao abrir o formulário, ele aparecer em branco?

Tem como eu bloquear para que uma vez cadastrada a empresa não possa ser alterada pelo mesmo formulário?

Para abrir um formulário em branco, para cadastrar um nova empresa. Use o evento ao carregar desse formulário o comando.

Private Sub Form_Load()
DoCmd.GoToRecord , , acNewRec
End Sub

Para travar os campos do referido formulário em questão use....

Private Sub Form_Current()
Dim ctl As Control
Dim StrName As String

For Each ctl In Me.Controls
Select Case ctl.ControlType
Case acTextBox, acComboBox, acListBox, acOptionGroup, acCheckBox
StrName = ctl.Name
Me(StrName).Enabled = False
End Select
Next ctl

End Sub

E para destravar o mesmo, crie um botão e insira o mesmo código mudando:
Me(StrName).Enabled = False

para

Me(StrName).Enabled = true


Bons estudo e sucesso a ti.

Silvio, eu na verdade fiz tudo até agora usando os modos design ou ajuda de assistente.

Se não for incômodo, teria como você me explicar como inserir estes códigos?

Fácil, no design do teu formulário em questão.

a- vá na folha de propriedades.
b- aba evento.
c- escolha o evento " ao carregar".
d- clicar na seta flutuante, vai mostrar ( procedimento de evento)
e- insira o código que te passei.
f- salve.
g- execute.

Um pitaco;

A maneira mais facil de abrir em branco, é:

1º Entre nas proriedades do seu formulario em modo de estrutura.

2º Vá na Guia "Dados"

3º Na linha "Data Entry" ou "Entrada de Dados", coloque = Sim

E voilá....

Silvio, Obrigado pela ajuda, mas não sei porque motivo está dando um erro.

Vou tentar anexar o arquivo aqui pra se vc tiver o interesse de ver depois...


JPaulo, a forma que você passou deu certo.


De coração, obrigado mesmo aos dois.