USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Dias do mes
arist.m
não registrado
Postada em 11/10/2006 12:48 hs   
Alguem tem a função que retorno o número de dias de um mes?
Grato
     
Sidnei X-Crow
Pontos: 2843
VITÓRIA
ES - BRASIL
Postada em 11/10/2006 21:19 hs         
Bem vc pode fazer do jeito dificil ou do jeito facil...

Vou mostrar o jeito facil pq vai demorar pra desenvolver o dificil hehehe
Dim StrData

StrData = "01/01/2007"

nDias = cInt(Day(DateAdd("d", -1, StrData)))

Bem é isso. Simples e rápido.

Abraços, Sidnei
     
arist.m
não registrado
Postada em 12/10/2006 02:41 hs   
Oi Sidnei, Vc trabalhou com uma data fixa.
Queimei minhas pestanas e saiu isto.
nDias = Day(DateAdd("d", -1, DateAdd("m", 1, ("01" & Mid(Date, 3, 8)))))
     
Sidnei X-Crow
Pontos: 2843
VITÓRIA
ES - BRASIL
ENUNCIADA !
Postada em 13/10/2006 14:10 hs         
Eu sei mas a inteção era so dar uma ideia da logica...
resumindo na linha q passei se vc jogar qq dia primeiro de um mes qualquer e subtrair o 1 dia vc tera o ultimo dia do mes anterior que por sua vez também é igual ao numero de dias do mesmo XD

Abraços, Sidnei
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página