CALCULAR QUANTIDADE DE MESES ENTRE 2 DATAS

 Tópico anterior Próximo tópico Novo tópico

CALCULAR QUANTIDADE DE MESES ENTRE 2 DATAS

VB / VBA

 Compartilhe  Compartilhe  Compartilhe
#489136 - 10/06/2019 12:47:05

AMELINHACODE
SAO PAULO
Cadast. em:Junho/2019


Olá meninos

Tenho 2 maskedbox (mask1 e mask2)

No mask1 coloco uma data inicial
no mask2 coloco a data final
queria que aparecesse no text1.text a quantidade de meses entre as 2 datas
como faço isso ?



#489140 - 10/06/2019 16:20:14

DAMASCENO.CESAR
ADAMANTINA
Cadast. em:Fevereiro/2009


Faz tempo que não mexo com vb, não lembro se tem a opção datediff, se tiver, usa ela

O conhecimento é como o dinheiro: quanto mais temos, mais queremos ter (Josh Billings)  


#489141 - 10/06/2019 16:29:42

AMELINHACODE
SAO PAULO
Cadast. em:Junho/2019


fiz assim

Dim date1 As Date
Dim date2 As Date
Dim result As Integer

    ' Atribui datas as variáveis
    date1 = mask1.text
    date2 = mask2.text
    
    ' Calcula a meses em dias
    result = DateDiff("m", date1, date2)

text1.text = result


mais não tá dando certo




#489142 - 10/06/2019 16:38:19

OMAR2007
MONTES CLAROS
Cadast. em:Maio/2019


Isto no site do Bacana.
http://www.macoratti.net/vb_datas.htm



#489143 - 10/06/2019 16:47:50

DAMASCENO.CESAR
ADAMANTINA
Cadast. em:Fevereiro/2009


no vb.net o "m" é maiusculo, e tenta convertendeo o mask.text em data

O conhecimento é como o dinheiro: quanto mais temos, mais queremos ter (Josh Billings)  


Resposta escolhida #489145 - 10/06/2019 22:01:44

JABA
CABO FRIO
Cadast. em:Agosto/2005


Citação:
:
fiz assim

Dim date1 As Date
Dim date2 As Date
Dim result As Integer

    ' Atribui datas as variáveis
    date1 = mask1.text
    date2 = mask2.text
    
    ' Calcula a meses em dias
    result = DateDiff("m", date1, date2)

text1.text = result


mais não tá dando certo


Você está no caminho certo. Teste fazendo diretamente, sem o uso de variáveis, depois de verificar se obteve sucesso assim, você parte para fazer dinamicamente. A primeira data precisa ser menor do que a primeira e tome cuidado também com o formato delas, pois se estiver no formato americano, o mês acaba sendo o primeiro digito e isso pode estar fazendo com que a primeira data seja maior do que a segunda.

Msgbox DateDiff("m", "17/6/76", "17/6/86")


_______________________________________________________________________________________________

Se a alma ou espírito são imateriais, como eles fazem para se localizarem quando o corpo está em movimento?



 Tópico anterior Próximo tópico Novo tópico


Tópico encerrado, respostas não sao permitidas
Encerrado por AMELINHACODE em 13/06/2019 09:48:48