Sao 2 Perguntas

[LeandroNRS]

BOm galera, não estou conseguindo somar valores. Por exemplo tenho 3 campos

digito valores em 2 campos e o outro ira aparecer o resultado da soma...

pois é mas ele ta é concatenando os valores. Em vez de 1+1 ser 2, fica sendo 11.

Sei lá acho q tenho q colocar o campo como sendo numerico, mas não sei fazer isso, como q arruma?

A outra pergunta é aseguinte, quando vou ver a ajuda do VB, ele diz pra reinstalar o MSDN, o q é isso? tenho o cd do VB aqui, já instalei, imagino q teria de ser tudo automatico, não?? como q faco pra ver a ajuda do VB??

[Rafael GAGA]

Pelo que eu sei, o MSDN que se refere é o help, e no meu caso esta no 2° cd. Quantos cds você tem?

[LeandroNRS]

Ta aí o problema, eu so tenho o primeiro cd...

onde eu arrumo será q tem algum download?

[creko]

se você quiser somar com casas decimal separada com virgula (,)!

total = cdbl(valor.Text) + cdbl(valor2.Text)
msg.Caption = total

se for somar com casas decimal separada com ponto (.)

total = val(valor.Text) + val(valor2.Text)
msg.Caption = total

abraço

[LeandroNRS]

ae creko, valeu mermo, consegui aqui colocando o tal cdbl hehehe

mas, agora, tem como eu formatar o campo pra ele somente receber numeros??

[Guest - The Lau -]

ai garoto! Bem enquanto os experts não respondem estou usando este código... E aproveitando o único impecilho é que o botão Back Space não funciona... e se alguém conseguir um melhor estamos aí... Por enquanto use esse....

Private Sub txtCcOutro_KeyPress(KeyAscii As Integer)

Dim strValid As String

strValid = "0123456789,"

If InStr(strValid, Chr(KeyAscii)) = 0 Then

KeyAscii = 0

End If

End Sub

Troque o txtCcOutro por o nome da caixa de texto...

[LeandroNRS]

talvez sabendo qual o valor do backspace no codigo ascii, funcione...

[Graymalkin]

talvez sabendo qual o valor do backspace no codigo ascii, funcione...

Exato, o backspace é 8. Basta então colocar...

strValid = "0123456789," & Chr(8)

... naquele código.

Abraços,

Graymalkin