Verificando Se O Campo Está Em Branco.

[Alan Santana]

Tenho um programa de cadastro.

e tenho as funções, salvar excluir entre outrras.

o problema é:

Quando todos os campos estiverem em branco, e eu clicar em salvar, e dará uma mensage, (campos em branco)

com faço isso?

Viva o Fórum,

Alan

[Ganhei]

If campo.TEXT = Empty Then
    MsgBox ("DIGITE A MENSAGEM"), vbInformation, "MENSAGEM"
        CAMPO.SetFocus
           Exit Sub
               END IF

SUPONDO QUE SEJA UM TEXTBOX

[Alan Santana]

VELHINHO,

USEI A O QUE você ME MANDOU, MAS O PROBLEMA É.

(EU QUE NÃO EXPLIQUEI DIREITO.)

MAS AÍ VEM O PROBLEMA DENOVO.

SE ESTIVER EM BRANCO, AVISE, CAMPO NOME EM BRANCO.

SE NÃO ESTIVER SALVE.

COMO FAZER?

ALAN

[Alan Santana]

valeu, está certo,

não tinha colocado o end if

valeu.

Alan

[Alan Santana]

Como faço para fazer quando eu clicar no sair ele pergunte se deseja sair mesmo?

se sim, ele continua no programa e se sim ele sai.

como faço isso?

[Evandro Fontes]

Ficaria algo mais ou menos assim:

Private Sub Command1_Click()

If MsgBox("Deseja sair deste programa?", vbOKOnly) = vbOK Then

    Unload Me

End If

End Sub

PS. só mudar o nome do botão... a mensagem da caixa de alerta, e se quiser incrementar alguma coisa a mais, fica a sua escolha.

Abraços,

Evandro

[dlumeida]

Private Sub Command1_Click()

If MsgBox("Deseja sair deste programa?", vbYesNo) = vbyes Then

    Unload Me

End If

End Sub

[Alan Santana]

Galera,

sei que é uma pergunta extremamente idiota.

é que faz tanto tempo que não uso vb que acabamos esquecendo um montão de coisas.

como eu uso o combobox?

tipo: vou cadastrar um endereço, e nele quero colocar as opções de rua e av.

como inserir esses campos?

valeu, mais uma vez.

Alan

[Alan Santana]

Aí, tive que fazer o seguinte.

Me.Combo1.AddItem ("Rua")

Valeu, mais uma vez.

viva o fórum.

Alan