F_CriaAnoMesDia

Retorna o Ano, Mês ou Dia de uma data nas variáveis Ano, Mês e Dia.

Sintaxe: RH.F_CriaAnoMesDia(Data, Ano, Mes, Dia)

A sintaxe da função F_CriaAnoMesDia contém os seguintes argumentos:

Parte	Descrição
Data	Informe a data que será utilizada como base
Ano	Informe o nome da variável que acumulará o Ano da data
Mes	Informe o nome da variável que acumulará o Mês da data
Dia	Informe o nome da variável que acumulará o Dia da data

Dim iDataAtual, iAnoData, iMesData, iDiaData, iApuraData

iDataAtual = Date
iApuraData = RH.F_CriaAnoMesDia(iDataAtual,iAnoData,iMesData,iDiaData)

MsgBox(iAnoData)
MsgBox(iMesData)
MsgBox(iDiaData)