Function Vs Sub Vbscript Date