Abrir formulário com 0,00 inserido no TexBox

Olá,

Tenho 3 TexBox na qual insiro apenas moeda neles, e depois mando calcular o imposto, onde os valores são a soma dos 2 primeiros vezes o terceiro.

Acontece que as vezes não é necessário preencher todos os TexBox, e quando isso acontece e mando calcular, dá erro, pois ficou 1 Texbox sem inserir nada nele.

A solução encontrada é deixar todos os TexBox já com 0,00 quando o formulário ser aberto, pois qdo abro atualmente, eles ficam vazios, e isso que tá causando o erro.

Aguardo ajuda de vcs.

Abraços!!!

Boa noite!!

Veja se assim funciona, va na janela de propriedades de cada textbox , chamada value, coloque lá seu valor e veja se vai dar certo.

Att

Prezado Alexandre,

O formulário possui os seguintes TextBox:

- txtTerrenoLote
- txtConstrucoes
- txtBenfeitoria

Eu coloquei 0,00 na propriedade "Value" dos TextBox, porém, quando abro o formulário e peço um novo cadastro, os TextBox permanecem vazios, e quando fica algum sem inserir valor, dá erro, devido o mesmo estar vazio.

Por exemplo:

Se eu inserir valor no txtTerrenoLote e txtConstrucoes, e deixar o txtBenfeitoria vazio, dá o seguinte erro:

Private Sub CommandButton5_Click()
txtTotalTributar.Value = CDbl(txtTerrenoLote.Value) + CDbl(txtBenfeitoria.Value) + CDbl(txtConstrucoes.Value)
txtValorITBI.Value = CDbl(txtTotalTributar.Value) * 0.02
txtTotalTributar.Text = Format(txtTotalTributar.Text, "#,###0.00")
txtValorITBI.Text = Format(txtValorITBI.Text, "#,###0.00")
With frmCadastroStudents
.CheckBox1.Enabled = True
End With
End Sub

Porém, se eu inserir valores nos 3 TextBox, funciona perfeitamente.

Boa noite!!

Tem como postar seu arquivo?

Att

Olá,

Segue o arquivo.

4shared.com/office/eGs9MO6u/soma_em_textbox_Excel.html

Abraços.

Boa noite!!!

Veja se é isso
http://www.4shared.com/office/0x1MtNea/TextBoxSomarAleVBA.html

Att

Olá Alexandre,

Funcionou do jeito que você fez, porém a opção "financiamento" no formulário não funciona mais.

Obs.: Antes ao clicar nesta opção, mudava o valor total de 2% para 1%.

Boa noite!!

Altere para seu código original (somente Private Sub CheckBox1_Click()), e veja se resolve.
Att