Trabalhando com Banco de Dados

Sistema ADMC - O Cadastro de Produtos - VALIDAÇÕES

VALIDAÇÃO / CRÍTICA- Validar o que foi digitado, pelo usuário do seu programa, no formulário é muito importante, pois esses dados se forem para o seu Banco de Dados de forma errada, não terão muita utilidade.

Além disso a validação ajuda o usuário a ter mais confiança no seu sistema.

Vamos melhorar o nosso programa de cadastro de produtos, para evitar erros durante a operação do mesmo:

Um ponto crítico encontrado no nosso programa é que ao clicar no botão Incluir, o registro é incluido no DataSet e isso está errado, pois o registro já existe, e ao clicar-mos no Atualizar, recebemos um erro pois existe uma chave duplicada. Como evitar isso.

1) Em primeiro lugar, desativando o botão Incluir na inicialização do formulário;

btnIncluir.Enabled = False

2) Esse botão deve ser habilitado ao clicarmos no botão Limpar;

btnIncluir.Enabled = True

3) Ao terminar a inclusão devemos desabilitar novamente o botão Incluir; na rotina de Inclusão mesmo.

btnIncluir.Enabled = False

Só isso já vai minimizar em muito o problema de chave-duplicada;

Agora vamos criar as rotinas, de validação em tempo real, ou seja vamos validar os dados durante a digitação dos mesmos.

Em nosso projeto ADMC, no formulário Cadastro de produtos vamos validar o código, no evento Validanting do txtProCodigo coloque as seguintes linhas de código;

If Me.txtProCodigo.Text.Trim().Length = 0 or _
   Not isnumeric(Me.txtProCodigo.Text) Then
         Messagebox.Show("O Código precisa ser Numérico","Erro Digitação")
         e.Cancel = True
End If

Vamos validar o Campo descrição agora:

If Me.txtProDescricao.Text.Trim().Length = 0 Then
      Messagebox.Show("A Descrição é obrigatória" ,"Erro Digitação")
      e.Cancel = True
End If

Outras Validações:

• Preço Custo = Numérico
• Preço de venda = Numérico
• Quantidade em estoque = Numérico
• Quantidade Mínima = Numérico
• Fornecedor = Numérico (Temos mais validações aqui, e no Código do produto.. aguarde)

Dicas:

• A função IsNumeric precisa do Namespace: Microsoft.VisualBasic

Ir para: Aula anterior | Proxima aula | Indice de Aulas

© 1999-2009 POWER Informática - Rua João Manoel, 912 - Centro - Santana do Livramento - RS
Fones: (55) 3 2 4 2 - 5 4 2 7 / (55) 9 9 9 4 - 8 7 8 2
Serviços Manutenção Hardware, programação, páginas Web