Olá Ewerton,
Faça o seguinte: cria uma variável String e converta para Date com a função CDate. Para o cálculo com hotas, use a função DateDiff:
Dim CampoData as String, CampoData2 as String
Dim Diferenca as Integer
'Pega os conteúdos dos campos Data da tabela
CampoData = RS!CampoData
CampoData2 = RS!CampoData2
Diferenca = DateDiff("h", CampoData, CampoData2)
Neste exemplo, você calcula a diferença em horas entre os dois campos