mcgyver
|
CRUZEIRO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 01/11/2004 11:25 hs
ola gente, tudo bem? como que eu faço para que sempre que eu abrir meu frmcadstro, o campo txtnome fique vazio e o cadastro seje feito sem que apareça mensagem de erro ou o cadstro seje feito em cima de um já existente? eu uso o código dtacadastro.recordset.additem, e sempre dá problema... obrigado... |
|
|
|
|
|
chico vieira
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 01/11/2004 12:21 hs
Aí, mano. Crie uma rotina para limpar os campos, sempre que vc entrar no form e clicar no botão . Assim, o form estará aguardando a entrada de novo registro. Ao terminar de preencher os campos do form, utilize o evento do último campo para desviar para um botão invísível que tenha as instruções AddNew e Update, com msgbox perguntando se deseja gravar os novos dados ou não. Se afirmativo, dispara o evento associado ao commandbutton . Caso contrário, fecha o form sem salvar o registro. Cappice? Chico. |
|
|
|
Mateus
|
AMADORA
PT - PORTUGAL
|
|
|
ENUNCIADA !
|
|
|
Postada em 03/11/2004 09:36 hs
Exemplo de função para limpar todos os campos do form: Public Sub LimparCampos()
Dim Obj As Control
For Each Obj In Controls
If TypeOf Obj Is TextBox Then Obj.Text = ""
If TypeOf Obj Is ComboBox Then Obj.Text = ""
If TypeOf Obj Is CheckBox Then Obj.Value = vbUnchecked
Next
End Sub No load do forms: Limpar Campos |
|
|
|
