bollywood actresses hair loss hair rehab london contact number cheap hair extensions brazilian curly hair with closure hair extension fails human hair wigs black ponytail hairstyles 2018 sunny hair extensions uk hair extensions remy hair extensions weft koko one piece hair extensions clip hair
Manipulando strings com a classe Strings
Manipulando Data e Hora com a classe DateTime

Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 2x no Cartão de Crédito. 

Veja como comprar e saiba mais sobre o material oferecido,  clicando aqui.

Open v3

 

Observe, na imagem abaixo, a classe DateTime e seus Membros.   Lista obtida através do Pesquisador de Objetos do VBA.

Usando Access - Pesquisador de objetos

Veja alguns exemplos de uso desta classe pelo Access:

Função Descrição Exemplo Retorno
 Date Retorna a data e a hora atuais do sistema.  Date  08/01/2019
 DateAdd Retorna uma data com número especificado de dias(d), semanas(ww), meses(m) ou anos(y), somado a data.  DateAdd("d",31,#08/01/2019#)


Nota: O VBA trabalha com o formato americano (mm/dd/yyyy).  Data exemplo usada na função:  1 de agosto de 2019

 09/01/2019

(mm/dd/yyyy)

 DateDiff Retorna um inteiro, representando a diferença entre duas datas.  DateDiff("d",#07/15/2019#,date)
 

Nota: assumindo Date #08/01/2019

 17
 DatePart Retorna a parte especificada de uma data, como o dia, o mês, o ano, o dia da semana(w), etc.  DatePart("w",#08/01/2019#)
 DatePart("d",#08/01/2019#)
 5 (quinta)
 1 (dia)
 DateSerial Retorna a data a partir dos argumentos de ano, mês e dia.  DateSerial(Ano,mês,dia)
 DateSerial(2019,8,1)
 08/01/2019
(mm/dd/yyyy)
 DateValue Retorna o formato de uma data, a entrada data em formato de caracteres.  DateValue("01-ago-2019")
 DateValue("01/ago/2019")
 DateValue("01/08/2019")
 08/01/2019
(mm/dd/yyyy)
 Day Retorna o valor inteiro entre 1 e 31 que representa um dia do mês a partir de um valor de data.  Day(#08/01/2019#)  1
 Hour Retorna o valor inteiro entre 0 e 23 que representa a hora de um valor de date/time.  Hour(#2:30 PM#)  14
 Minute Retorna o valor inteiro entre 0 e 59, que representa os minutos de um valor de date/time.  Minute(#2:30 PM#)  30
 Month Retorna o valor inteiro entre 1 e 12 que representa o mês de um valor de date/time.  Month(#08/01/2019#)  8
 MonthName Retorna o nome abreviado ou completo de mês a partir do número do mês (1 a 12).  Se você omitir o segundo argumento, a função retornará o nome completo.  MonthName(08,False)
 MonthName(08,true)
 MonthName(08)
 agosto
 ago
 agosto
 Now Retorna a data e a hora do relógio do sistema do computador.  Now  01/08/2019
 15:21:47
 Second Retorna o valor inteiro entre 0 e 59 que representa os segundos de um valor de date/time.  Second(now)  47
 Time Retorna a parte de hora de uma valor de date/time, retirado do relógio interno do sistema.  Time  15:21:47
 TimeSerial Retorna a hora a partir dos argumentos hora, minutos e segundos inseridos na função.  TimeSerial(15,21,47)  15:21:47
 TimeValue Retorna no formato hora a string hora inserida na função.  TimeValue("11:57 PM")  23:57
 Weekday Retorna o dia da semana ( 1 a 7 )(1=domingo) correspondente a data.  Weekday(#08/01/2019#)  5 (quinta)
 WeekdayName Retorna o nome completo ou abreviado do dia, a partir do número do dia(1 a 7).  A definição do segundo argumento em TRUE abrevia o nome.  
 WeekdayName(5,false)
 WeekdayName(5,true)
 WeekdayName(5)

 

 Quinta-Feira
 Qui

 Quinta-Feira

 Year Retorna o ano de um valor date/time.  
 Year(#08/01/2019#)
 
2019
       

 

Saiba como explorar o HELP do VBA através desta minha vídeo-aula.


Bom estudo!


 

 


2 comentário(s)

Avelino Sampaio   20/07/2023 10:33:40

Gelson

Experimente assim:

format(now,"ddmmyyyyhhmmss")


Gelson Dias   19/07/2023 10:05:25

Problema:
Preciso criar uma sequência de registros que não se repetem e usar a data/hora como aparte dele.
Como transformar uma data/hora/minuto/segundo em um número inteiro?


Envie seu comentário: