Ir para conteúdo
Fórum Script Brasil

StormRuller

Membros
  • Total de itens

    7
  • Registro em

  • Última visita

Posts postados por StormRuller

  1. Tenho um formulário com os campos Nome, Lider, E-mail, Data de Inicio e Data do Fim onde ao clicar no botão Gravar e vi que a função que eu usei abaixo mostra que o campo não foi digitado e pede para digitar.

    Private Sub gravar_Click()
    If txtnome.Text = Empty Then
        MsgBox "Nome não foi informado"
        TextBox.SetFocus
    Else
    End If
    
    If txtlider.Text = Empty Then
        MsgBox "Líder não foi informado"
        TextBox.SetFocus
    Else
    End If
    
    If txtemail.Text = Empty Then
        MsgBox "E-mail não foi informado"
        TextBox.SetFocus
    Else
    End If
    
    If maskdtinicio.Text = Empty Then
        MsgBox "Data de inicio não foi informado"
        TextBox.SetFocus
    Else
    End If
    
    If maskdtfim.Text = Empty Then
        MsgBox "Data do fim não foi informado"
        TextBox.SetFocus
    Else
    End If
    End Sub

    Teria algum modo mais facil de fazer esse tipo de funcao??? Tenho outros formularios para preencher e tem mais campos onde terei que fazer isso... existe algum modo mais simples???

    Valeu!!

×
×
  • Criar Novo...