SOMAR VARIAVEIS STRING

ELMO01 18/08/2009 10:13:46
#320128
Bom dia pessoal,

Estou tentando somar quatro variáveis strings, só que me retorna um número todo doido, veja abixo com estou tentando fazer esta conta.

Dim NewFaltas as variant
NewFaltas = IIf(Msk_Falt01.Text <> [Ô]__:__[Ô], CDbl(Msk_Falt01.Text), CDbl([Ô]00:00[Ô])) + _
IIf(Msk_Falt02.Text <> [Ô]__:__[Ô], CDbl(Msk_Falt02.Text), CDbl([Ô]00:00[Ô])) + _
IIf(Msk_Falt03.Text <> [Ô]__:__[Ô], CDbl(Msk_Falt03.Text), CDbl([Ô]00:00[Ô])) + _
IIf(Msk_Falt04.Text <> [Ô]__:__[Ô], CDbl(Msk_Falt04.Text), CDbl([Ô]00:00[Ô]))
Onde:
Msk_Falt01.Text = 01:00
Msk_Falt02.Text = 00:50
Msk_Falt03.Text = 00:50
Msk_Falt04.Text = 01:00

Repare que as variáveis são do tipo string imitando horas abreviada.
Gostaria que na variável NEWFALTAS me retornasse o valor de 03:00, só que isto não está acontecendo,

O que estou fazendo de errado

Obrigado,
TECLA 18/08/2009 10:23:06
#320129 Resposta escolhida
Tente assim:
MsgBox CDate([Ô]01:00[Ô]) + CDate([Ô]00:30[Ô]) + CDate([Ô]00:40[Ô])
ELMO01 18/08/2009 10:32:09
#320133
Tecla - valeu - deu certo - mt obrigado
TECLA 18/08/2009 10:42:36
#320134
Falou.

Não esquece de encerrar o tópico.
Até mais!
ELMO01 18/08/2009 11:26:11
#320135
Tecla - quando digito um valor no campo que seja acima de 24:00 horas horas, me retorna o seguitne erro:

RUN-TIME ERROR [ô]13[ô]
TYPE MISMATCH

Talvez porque estamos contando como horas, tem algum jeito de ao digitar neste campo com um nº acima de 24:00 horas ele aceite??

Obrigado,
Tópico encerrado , respostas não são mais permitidas
Voltar